diff options
| author | Richard M. Stallman <[email protected]> | 2002-06-17 16:15:09 +0000 |
|---|---|---|
| committer | Richard M. Stallman <[email protected]> | 2002-06-17 16:15:09 +0000 |
| commit | 0b69eec589634ccd6815d9484dbcd95d77be8b37 (patch) | |
| tree | 214eeadb9ff40dbeafa28abf24f1cc37b8df2d07 /lisp/simple.el | |
| parent | cea5ec30b493ae72d25644fb465e6a3fada8664a (diff) | |
(what-cursor-position): Use describe-char.
Diffstat (limited to 'lisp/simple.el')
| -rw-r--r-- | lisp/simple.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 9f01cef9f6..14d1670b6b 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -530,7 +530,7 @@ code is shown in hex. If the character is encoded into more than one byte, just \"...\" is shown. In addition, with prefix argument, show details about that character -in *Help* buffer. See also the command `describe-char-after'." +in *Help* buffer. See also the command `describe-char'." (interactive "P") (let* ((char (following-char)) (beg (point-min)) @@ -570,7 +570,7 @@ in *Help* buffer. See also the command `describe-char-after'." (format "(0%o, %d, 0x%x)" char char char)))) (if detail ;; We show the detailed information about CHAR. - (describe-char-after (point))) + (describe-char (point))) (if (or (/= beg 1) (/= end (1+ total))) (message "Char: %s %s point=%d of %d (%d%%) <%d - %d> column %d %s" (if (< char 256) |