Mercurial > emacs
comparison lisp/pcomplete.el @ 65582:4d1085b02d64
Message format spec fixes (1)
author | Deepak Goel <deego@gnufans.org> |
---|---|
date | Sun, 18 Sep 2005 12:25:02 +0000 |
parents | 41bb365f41c4 |
children | 3bd95f4f2941 fa0da9b57058 |
comparison
equal
deleted
inserted
replaced
65581:fd1833c3398a | 65582:4d1085b02d64 |
---|---|
1136 (if (and pcomplete-help | 1136 (if (and pcomplete-help |
1137 (or (and (stringp pcomplete-help) | 1137 (or (and (stringp pcomplete-help) |
1138 (fboundp 'Info-goto-node)) | 1138 (fboundp 'Info-goto-node)) |
1139 (listp pcomplete-help))) | 1139 (listp pcomplete-help))) |
1140 (if (listp pcomplete-help) | 1140 (if (listp pcomplete-help) |
1141 (message (eval pcomplete-help)) | 1141 (message "%s" (eval pcomplete-help)) |
1142 (save-window-excursion (info)) | 1142 (save-window-excursion (info)) |
1143 (switch-to-buffer-other-window "*info*") | 1143 (switch-to-buffer-other-window "*info*") |
1144 (funcall (symbol-function 'Info-goto-node) pcomplete-help)) | 1144 (funcall (symbol-function 'Info-goto-node) pcomplete-help)) |
1145 (if pcomplete-man-function | 1145 (if pcomplete-man-function |
1146 (let ((cmd (funcall pcomplete-command-name-function))) | 1146 (let ((cmd (funcall pcomplete-command-name-function))) |