1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-31 11:13:50 +00:00

(Info-on-current-buffer): Doc fix.

(info-insert-file-contents): Don't test (featurep 'jka-compr).
This commit is contained in:
Richard M. Stallman 2005-12-12 05:15:53 +00:00
parent 9c8b215040
commit 70746649f8

View File

@ -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)