Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
0b9c5ab7
Commit
0b9c5ab7
authored
Feb 10, 2008
by
Reiner Steib
Browse files
(mm-codepage-setup): If cp-supported-codepages isn't
fbound (Emacs 23 unicode), signal an error.
parent
4b75ffab
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
9 additions
and
1 deletion
+9
-1
lisp/gnus/ChangeLog
lisp/gnus/ChangeLog
+5
-0
lisp/gnus/mm-util.el
lisp/gnus/mm-util.el
+4
-1
No files found.
lisp/gnus/ChangeLog
View file @
0b9c5ab7
2008-02-10 Reiner Steib <Reiner.Steib@gmx.de>
* mm-util.el (mm-codepage-setup): If cp-supported-codepages isn't
fbound (Emacs 23 unicode), signal an error.
2008-02-08 Glenn Morris <rgm@gnu.org>
* gnus-art.el (pgg-display-output-buffer): Declare as function.
...
...
lisp/gnus/mm-util.el
View file @
0b9c5ab7
...
...
@@ -219,7 +219,10 @@ non-nil, an alias is created and added to
the alias. Else windows-NUMBER is used."
(
interactive
(
let
((
completion-ignore-case
t
)
(
candidates
(
cp-supported-codepages
)))
(
candidates
(
if
(
fboundp
'cp-supported-codepages
)
(
cp-supported-codepages
)
;; Removed in Emacs 23 (unicode), sosignal an error:
(
error
"`codepage-setup' is obsolete in this Emacs version."
))))
(
list
(
completing-read
"Setup DOS Codepage: (default 437) "
candidates
nil
t
nil
nil
"437"
))))
(
when
alias
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment