# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1134364553 0
# Node ID d08070c157fd9deb96f6b4ead9d09aeb1ec672b0
# Parent  f69aa26e69fdbb7308480cf9ab1f7be7b488540e
(Info-on-current-buffer): Doc fix.
(info-insert-file-contents): Don't test (featurep 'jka-compr).

diff -r f69aa26e69fd -r d08070c157fd lisp/info.el
--- a/lisp/info.el	Mon Dec 12 05:14:51 2005 +0000
+++ b/lisp/info.el	Mon Dec 12 05:15:53 2005 +0000
@@ -448,8 +448,7 @@
       (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 @@
 
 ;;;###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)