diff options
author | Richard M. Stallman <rms@gnu.org> | 2005-12-12 05:15:53 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 2005-12-12 05:15:53 +0000 |
commit | 70746649f8cb997fce9dcd921164574dd8dc68c5 (patch) | |
tree | 79d36298d0cd5e02d3b90458351223d678e52565 | |
parent | 9c8b2150403570970c3e08dcb415fdea6a723cd2 (diff) | |
download | emacs-70746649f8cb997fce9dcd921164574dd8dc68c5.tar.gz |
(Info-on-current-buffer): Doc fix.
(info-insert-file-contents): Don't test (featurep 'jka-compr).
-rw-r--r-- | lisp/info.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/info.el b/lisp/info.el index 94bf36222f0..24d92b2bdd7 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -448,8 +448,7 @@ Do the right thing if the file has been compressed or zipped." (or tail (error "Can't find %s or any compressed version of it" filename))) ;; check for conflict with jka-compr - (if (and (featurep 'jka-compr) - (jka-compr-installed-p) + (if (and (jka-compr-installed-p) (jka-compr-get-compression-info fullname)) (setq decoder nil)) (if decoder @@ -698,9 +697,9 @@ it says do not attempt further (recursive) error recovery." ;;;###autoload (defun Info-on-current-buffer (&optional nodename) - "Use the `Info-mode' to browse the current Info buffer. -If a prefix arg is provided, it queries for the NODENAME which -else defaults to \"Top\"." + "Use Info mode to browse the current Info buffer. +With a prefix arg, this queries for the node name to visit first; +otherwise, that defaults to `Top'." (interactive (list (if current-prefix-arg (completing-read "Node name: " (Info-build-node-completions) |