diff options
| author | Stefan Kangas | 2021-12-03 19:25:59 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2021-12-03 19:27:16 +0100 |
| commit | 76bbb7e648d46cfdc73675eb6e5f52e146f4c368 (patch) | |
| tree | c2abd18fe2a71b4a1f2599d5c4c691a6a4d53faf | |
| parent | 5586eb463fb3c11298f6e1a0b4fd1e86b9a1dd65 (diff) | |
| download | emacs-76bbb7e648d46cfdc73675eb6e5f52e146f4c368.tar.gz emacs-76bbb7e648d46cfdc73675eb6e5f52e146f4c368.zip | |
Remove two functions obsolete since Emacs 23
* lisp/international/mule-cmds.el (unify-8859-on-encoding-mode)
(unify-8859-on-decoding-mode): Remove functions obsolete since
Emacs 23.
* lisp/nxml/xsd-regexp.el: Doc fix.
| -rw-r--r-- | etc/NEWS | 3 | ||||
| -rw-r--r-- | lisp/international/mule-cmds.el | 16 | ||||
| -rw-r--r-- | lisp/nxml/xsd-regexp.el | 3 |
3 files changed, 3 insertions, 19 deletions
| @@ -767,6 +767,9 @@ Use 'exif-parse-file' and 'exif-field' instead. | |||
| 767 | ** 'insert-directory' alternatives should not change the free disk space line. | 767 | ** 'insert-directory' alternatives should not change the free disk space line. |
| 768 | This change is now applied in 'dired-insert-directory'. | 768 | This change is now applied in 'dired-insert-directory'. |
| 769 | 769 | ||
| 770 | ** Some functions obsolete since Emacs 23 have been removed: | ||
| 771 | 'unify-8859-on-encoding-mode', 'unify-8859-on-decoding-mode'. | ||
| 772 | |||
| 770 | 773 | ||
| 771 | * Lisp Changes in Emacs 29.1 | 774 | * Lisp Changes in Emacs 29.1 |
| 772 | 775 | ||
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 9f3f2a20849..b84d9e0823d 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el | |||
| @@ -3077,22 +3077,6 @@ on encoding." | |||
| 3077 | 0)) | 3077 | 0)) |
| 3078 | (substring enc2 i0 i2))))) | 3078 | (substring enc2 i0 i2))))) |
| 3079 | 3079 | ||
| 3080 | ;; Backwards compatibility. These might be better with :init-value t, | ||
| 3081 | ;; but that breaks loadup. | ||
| 3082 | (define-minor-mode unify-8859-on-encoding-mode | ||
| 3083 | "Exists only for backwards compatibility." | ||
| 3084 | :group 'mule | ||
| 3085 | :global t) | ||
| 3086 | ;; Doc said "obsolete" in 23.1, this statement only added in 24.1. | ||
| 3087 | (make-obsolete 'unify-8859-on-encoding-mode "don't use it." "23.1") | ||
| 3088 | |||
| 3089 | (define-minor-mode unify-8859-on-decoding-mode | ||
| 3090 | "Exists only for backwards compatibility." | ||
| 3091 | :group 'mule | ||
| 3092 | :global t) | ||
| 3093 | ;; Doc said "obsolete" in 23.1, this statement only added in 24.1. | ||
| 3094 | (make-obsolete 'unify-8859-on-decoding-mode "don't use it." "23.1") | ||
| 3095 | |||
| 3096 | (defvar ucs-names nil | 3080 | (defvar ucs-names nil |
| 3097 | "Hash table of cached CHAR-NAME keys to CHAR-CODE values.") | 3081 | "Hash table of cached CHAR-NAME keys to CHAR-CODE values.") |
| 3098 | 3082 | ||
diff --git a/lisp/nxml/xsd-regexp.el b/lisp/nxml/xsd-regexp.el index f07ca6657ed..3c29803ab97 100644 --- a/lisp/nxml/xsd-regexp.el +++ b/lisp/nxml/xsd-regexp.el | |||
| @@ -52,9 +52,6 @@ | |||
| 52 | ;; or a character translatable to such a character (i.e a character | 52 | ;; or a character translatable to such a character (i.e a character |
| 53 | ;; for which `encode-char' will return non-nil). | 53 | ;; for which `encode-char' will return non-nil). |
| 54 | ;; | 54 | ;; |
| 55 | ;; Using unify-8859-on-decoding-mode is probably a good idea here | ||
| 56 | ;; (and generally with XML and other Unicode-oriented formats). | ||
| 57 | ;; | ||
| 58 | ;; Unfortunately, this means that this package is currently useless | 55 | ;; Unfortunately, this means that this package is currently useless |
| 59 | ;; for CJK characters, since there's no mule-unicode charset for the | 56 | ;; for CJK characters, since there's no mule-unicode charset for the |
| 60 | ;; CJK ranges of Unicode. We should devise a workaround for this | 57 | ;; CJK ranges of Unicode. We should devise a workaround for this |