Require view when compiling.

(view-emacs-FAQ): Use Info version.

diff --git a/lisp/help.el b/lisp/help.el
index 7e5f9a4396d976e557e88d62a4d6930b2ca0bb2a..f07708a9461fd9151e437bca56ed4b2332089fd5 100644 (file)
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -32,6 +32,7 @@
 ;; Get the macro make-help-screen when this is compiled,
 ;; or run interpreted, but not when the compiled code is loaded.
 (eval-when-compile (require 'help-macro))
+(eval-when-compile (require 'view))
 
 (defvar help-map (make-sparse-keymap)
   "Keymap for characters following the Help key.")
@@ -452,7 +453,8 @@ With numeric argument display information on correspondingly older changes."
 (defun view-emacs-FAQ ()
   "Display the Emacs Frequently Asked Questions (FAQ) file."
   (interactive)
-  (find-file-read-only (expand-file-name "FAQ" data-directory)))
+;;;  (find-file-read-only (expand-file-name "FAQ" data-directory))
+  (info "(emacs-faq)"))
 
 (defun view-lossage ()
   "Display last 100 input keystrokes."