[Emacs-diffs] Changes to emacs/lisp/international/codepage.el

[Romain Francoise]

Index: emacs/lisp/international/codepage.el
diff -c emacs/lisp/international/codepage.el:1.32 
emacs/lisp/international/codepage.el:1.33
*** emacs/lisp/international/codepage.el:1.32   Tue Sep 13 08:46:17 2005
--- emacs/lisp/international/codepage.el        Sat Sep 24 13:43:59 2005
***************
*** 662,668 ****
    (interactive
     (let ((completion-ignore-case t)
         (candidates (cp-supported-codepages)))
!      (list (completing-read "Setup DOS Codepage: (default 437) " candidates
                            nil t nil nil "437"))))
    (let* ((cp (format "cp%s" codepage))
         (cp-defined (intern-soft cp)))
--- 662,668 ----
    (interactive
     (let ((completion-ignore-case t)
         (candidates (cp-supported-codepages)))
!      (list (completing-read "Setup DOS Codepage (default 437): " candidates
                            nil t nil nil "437"))))
    (let* ((cp (format "cp%s" codepage))
         (cp-defined (intern-soft cp)))