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:
parent
9c8b215040
commit
70746649f8
@ -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)
|
||||
|
Loading…
Reference in New Issue
Block a user