awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-29 14:33:34 -05:00
Code Issues Packages Projects Releases Wiki Activity

modeline: shorten PREFER-UTF-8 to UTF-8

Browse Source
This commit is contained in:
Henrik Lissner
2016-12-24 18:45:03 -05:00
parent a65121a371
commit f8e36a093c
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
core/core-modeline.el
View File

@@ -217,9 +217,8 @@ directory, the file name, and its state (modified, read-only or non-existent)."
(cond ((eq eol-type 0) "LF ") (cond ((eq eol-type 0) "LF ")
((eq eol-type 1) "CRLF ") ((eq eol-type 1) "CRLF ")
((eq eol-type 2) "CR "))) ((eq eol-type 2) "CR ")))
(upcase (symbol-name (let ((coding-sys (plist-get (coding-system-plist buffer-file-coding-system) :name)))
(plist-get (coding-system-plist buffer-file-coding-system) (upcase (symbol-name (if (eq coding-sys 'prefer-utf-8) 'utf-8 coding-sys))))
:name)))
" ")) " "))
(defun *major-mode () (defun *major-mode ()