Mercurial > emacs
comparison lisp/international/mule-diag.el @ 42163:126eaf6fdbcf
(describe-character-set): Fix the arg to help-xref-button.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 18 Dec 2001 21:14:28 +0000 |
parents | f41a14872734 |
children | 2c4fb0cccd48 |
comparison
equal
deleted
inserted
replaced
42162:478d5ff60075 | 42163:126eaf6fdbcf |
---|---|
510 (charset-multibyte-form-string charset))) | 510 (charset-multibyte-form-string charset))) |
511 (let ((coding (plist-get (aref info 14) 'preferred-coding-system))) | 511 (let ((coding (plist-get (aref info 14) 'preferred-coding-system))) |
512 (when coding | 512 (when coding |
513 (insert (format "preferred coding system: %s\n" coding)) | 513 (insert (format "preferred coding system: %s\n" coding)) |
514 (search-backward (symbol-name coding)) | 514 (search-backward (symbol-name coding)) |
515 (help-xref-button 0 'describe-coding-system coding))))))) | 515 (help-xref-button 0 'help-coding-system coding))))))) |
516 | 516 |
517 ;;;###autoload | 517 ;;;###autoload |
518 (defun describe-char-after (&optional pos) | 518 (defun describe-char-after (&optional pos) |
519 "Display information about the character at POS in the current buffer. | 519 "Display information about the character at POS in the current buffer. |
520 POS defaults to point. | 520 POS defaults to point. |