diff options
| author | Stefan Kangas <stefankangas@gmail.com> | 2020-05-16 17:02:18 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2020-05-16 17:43:30 +0200 |
| commit | d1545e2a038651e7a5203026202189351540b7f5 (patch) | |
| tree | bf8e782dafd2f6c8fcd63cab622a2473764dfb41 /lisp/abbrev.el | |
| parent | e07a751e08835ebae7fc23ae3fc4b81142d4ac9e (diff) | |
| download | emacs-d1545e2a038651e7a5203026202189351540b7f5.tar.gz emacs-d1545e2a038651e7a5203026202189351540b7f5.tar.bz2 emacs-d1545e2a038651e7a5203026202189351540b7f5.zip | |
Remove Emacs 22 compat code from abbrev.el
* lisp/abbrev.el (write-abbrev-file): Remove Emacs 22
compatibility code.
Diffstat (limited to 'lisp/abbrev.el')
| -rw-r--r-- | lisp/abbrev.el | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/lisp/abbrev.el b/lisp/abbrev.el index 190b3504fa7..2d61a96010e 100644 --- a/lisp/abbrev.el +++ b/lisp/abbrev.el @@ -255,11 +255,7 @@ have been saved." (if (abbrev--table-symbols table) (insert-abbrev-table-description table nil))) (when (unencodable-char-position (point-min) (point-max) 'utf-8) - (setq coding-system-for-write - (if (> emacs-major-version 24) - 'utf-8-emacs - ;; For compatibility with Emacs 22 (See Bug#8308) - 'emacs-mule))) + (setq coding-system-for-write 'utf-8-emacs)) (goto-char (point-min)) (insert (format ";;-*-coding: %s;-*-\n" coding-system-for-write)) (write-region nil nil file nil (and (not verbose) 0))))) |