summaryrefslogtreecommitdiff
path: root/lisp/international/mule-diag.el
diff options
context:
space:
mode:
authorDmitry Antipov <dmantipov@yandex.ru>2016-06-30 08:37:46 +0300
committerDmitry Antipov <dmantipov@yandex.ru>2016-06-30 08:37:46 +0300
commit4bd3503991e501690b30c3415d4641efb6e1de3a (patch)
tree07be08f92ed57419d6179cf7de3e97b74cee2dbe /lisp/international/mule-diag.el
parent681d3f1f582d9b549f41ef1eacff42abb98f878d (diff)
downloademacs-4bd3503991e501690b30c3415d4641efb6e1de3a.tar.gz
Cleanup around mature character manipulation functions
* lisp/international/mule-diag.el (decode-codepage-char): Remove. * lisp/ldefs-boot.el (toplevel): Adjust accordingly. * lisp/subr.el (toplevel): Do not advertise calling conventions for 'decode-char' and 'encode-char'. * src/charset.c (Fdecode_char, Fencode_char): Remove unused 3rd arg.
Diffstat (limited to 'lisp/international/mule-diag.el')
-rw-r--r--lisp/international/mule-diag.el7
1 files changed, 0 insertions, 7 deletions
diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el
index fbb0e0cb96f..731d6889ef5 100644
--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -204,13 +204,6 @@ Character sets for defining other charsets, or for backward compatibility
"Obsolete.")
(make-obsolete-variable 'non-iso-charset-alist "no longer relevant." "23.1")
-(defun decode-codepage-char (codepage code)
- "Decode a character that has code CODE in CODEPAGE.
-Return a decoded character string. Each CODEPAGE corresponds to a
-coding system cpCODEPAGE."
- (declare (obsolete decode-char "23.1"))
- (decode-char (intern (format "cp%d" codepage)) code))
-
;; A variable to hold charset input history.
(defvar charset-history nil)