1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 16:51:06 -07:00

(what-cursor-position): Show char in decimal, hex, octal.

This commit is contained in:
Richard M. Stallman 1995-01-06 20:48:57 +00:00
parent 34c3130121
commit 2a83421caa

View file

@ -374,10 +374,10 @@ and the greater of them is not at the start of a line."
(message "point=%d of %d(%d%%) column %d %s"
pos total percent col hscroll))
(if (or (/= beg 1) (/= end (1+ total)))
(message "Char: %s (0%o) point=%d of %d(%d%%) <%d - %d> column %d %s"
(single-key-description char) char pos total percent beg end col hscroll)
(message "Char: %s (0%o) point=%d of %d(%d%%) column %d %s"
(single-key-description char) char pos total percent col hscroll)))))
(message "Char: %s (0%o, %d, 0x%x) point=%d of %d(%d%%) <%d - %d> column %d %s"
(single-key-description char) char char char pos total percent beg end col hscroll)
(message "Char: %s (0%o, %d, 0x%x) point=%d of %d(%d%%) column %d %s"
(single-key-description char) char char char pos total percent col hscroll)))))
(defun fundamental-mode ()
"Major mode not specialized for anything in particular.