diff options
| author | Karl Heuer <kwzh@gnu.org> | 1998-10-06 23:30:31 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1998-10-06 23:30:31 +0000 |
| commit | c3d0fe180e84760ac908a1567536a86fbd337a9b (patch) | |
| tree | 1cc9e4ae731efec6f80be5675a1e8296c142e7cf | |
| parent | 64e6dfad6bdf25f85d2c93c4168780068221408a (diff) | |
| download | emacs-c3d0fe180e84760ac908a1567536a86fbd337a9b.tar.gz | |
(apropos-print): control invalid characters.
| -rw-r--r-- | lisp/apropos.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index 98a15923e86..b391e5157b7 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -558,7 +558,9 @@ alphabetically by symbol name; but this function also sets (insert (mapconcat (lambda (key) - (setq key (key-description key)) + (setq key (condition-case () + (key-description key) + (error))) (if apropos-keybinding-face (put-text-property 0 (length key) 'face apropos-keybinding-face |