/[emacs]/emacs/lisp/international/codepage.el
ViewVC logotype

Diff of /emacs/lisp/international/codepage.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.23 by pj, Tue Dec 11 06:56:10 2001 UTC revision 1.24 by pj, Wed Dec 12 20:01:35 2001 UTC
# Line 588  decoder and encoder created by this func Line 588  decoder and encoder created by this func
588      ))      ))
589    
590  (defun cp-codepage-decoder (codepage)  (defun cp-codepage-decoder (codepage)
591    "If CODEPAGE is the name of a supported codepage, return its decode table;    "If CODEPAGE is the name of a supported codepage, return its decode table.
592  otherwise return nil."  Otherwise return nil."
593    (let ((cp (if (symbolp codepage) (symbol-name codepage) codepage)))    (let ((cp (if (symbolp codepage) (symbol-name codepage) codepage)))
594      (cond      (cond
595       ((stringp cp)       ((stringp cp)

Legend:
Removed from v.1.23  
changed lines
  Added in v.1.24

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26