[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/info.el
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/info.el |
Date: |
Sun, 03 Jul 2005 22:12:32 -0400 |
Index: emacs/lisp/info.el
diff -c emacs/lisp/info.el:1.433 emacs/lisp/info.el:1.434
*** emacs/lisp/info.el:1.433 Sun Jul 3 16:11:30 2005
--- emacs/lisp/info.el Mon Jul 4 02:12:31 2005
***************
*** 38,44 ****
(eval-when-compile (require 'jka-compr))
(defgroup info nil
! "Info subsystem"
:group 'help
:group 'docs)
--- 38,44 ----
(eval-when-compile (require 'jka-compr))
(defgroup info nil
! "Info subsystem."
:group 'help
:group 'docs)
***************
*** 2868,2874 ****
(while (progn (setq flag (not (pos-visible-in-window-p (point-max))))
(message (if flag "Type Space to see more"
"Type Space to return to Info"))
! (if (not (eq ?\ (setq ch (read-event))))
(progn (setq unread-command-events (list ch)) nil)
flag))
(scroll-up)))
--- 2868,2874 ----
(while (progn (setq flag (not (pos-visible-in-window-p (point-max))))
(message (if flag "Type Space to see more"
"Type Space to return to Info"))
! (if (not (eq ?\s (setq ch (read-event))))
(progn (setq unread-command-events (list ch)) nil)
flag))
(scroll-up)))