diff options
| author | Kenichi Handa | 2000-08-31 07:03:28 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2000-08-31 07:03:28 +0000 |
| commit | 880c345e7dd97f974c8d6c349f2dfda9c787c4c6 (patch) | |
| tree | ab67bfe3f5d0b6c2b14b5a50bd59aea775180215 | |
| parent | 9941d4c7172ce2e5eb824e982cca6e128dc2cab6 (diff) | |
| download | emacs-880c345e7dd97f974c8d6c349f2dfda9c787c4c6.tar.gz emacs-880c345e7dd97f974c8d6c349f2dfda9c787c4c6.zip | |
(help-make-xrefs): Don't make hyperlinks for incorrect coding systems.
| -rw-r--r-- | lisp/help.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/help.el b/lisp/help.el index a6d804c3e6e..a5d9bb22f57 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -1134,7 +1134,7 @@ that." | |||
| 1134 | (sym (intern-soft data))) | 1134 | (sym (intern-soft data))) |
| 1135 | (cond | 1135 | (cond |
| 1136 | ((match-string 3) ; coding system | 1136 | ((match-string 3) ; coding system |
| 1137 | (and (coding-system-p sym) | 1137 | (and sym (coding-system-p sym) |
| 1138 | (help-xref-button | 1138 | (help-xref-button |
| 1139 | 5 #'describe-coding-system sym | 1139 | 5 #'describe-coding-system sym |
| 1140 | "mouse-2, RET: describe this coding system"))) | 1140 | "mouse-2, RET: describe this coding system"))) |
| @@ -1143,7 +1143,7 @@ that." | |||
| 1143 | (help-xref-button | 1143 | (help-xref-button |
| 1144 | 5 #'describe-input-method data | 1144 | 5 #'describe-input-method data |
| 1145 | "mouse-2, RET: describe this input method"))) | 1145 | "mouse-2, RET: describe this input method"))) |
| 1146 | ((coding-system-p sym) | 1146 | ((and sym (coding-system-p sym)) |
| 1147 | (help-xref-button | 1147 | (help-xref-button |
| 1148 | 5 #'describe-coding-system sym | 1148 | 5 #'describe-coding-system sym |
| 1149 | "mouse-2, RET: describe this coding system")) | 1149 | "mouse-2, RET: describe this coding system")) |