Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
1614c867
Commit
1614c867
authored
Mar 06, 1993
by
Richard M. Stallman
Browse files
(Info-summary): Handle any event when flushing the display.
parent
8f90f594
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
1 addition
and
1 deletion
+1
-1
lisp/info.el
lisp/info.el
+1
-1
No files found.
lisp/info.el
View file @
1614c867
...
...
@@ -896,7 +896,7 @@ N is the digit argument used to invoke this command."
(
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
(
/=
?\
(
setq
ch
(
read-
char
)))
(
if
(
not
(
eq
?\
(
setq
ch
(
read-
event
)
)))
(
progn
(
setq
unread-command-events
(
list
ch
))
nil
)
flag
))
(
scroll-up
)))))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment