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
cc101382
Commit
cc101382
authored
Oct 15, 1994
by
Richard M. Stallman
Browse files
(rmail-summary-previous-all)
(rmail-summary-next-all): Don't move forward to the end of the buffer.
parent
d0d74413
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
6 additions
and
0 deletions
+6
-0
lisp/mail/rmailsum.el
lisp/mail/rmailsum.el
+6
-0
No files found.
lisp/mail/rmailsum.el
View file @
cc101382
...
...
@@ -379,11 +379,17 @@ nil for FUNCTION means all messages."
(
defun
rmail-summary-next-all
(
&optional
number
)
(
interactive
"p"
)
(
forward-line
(
if
number
number
1
))
;; It doesn't look nice to move forward past the last message line.
(
and
(
eobp
)
(
>
number
0
)
(
forward-line
-1
))
(
display-buffer
rmail-buffer
))
(
defun
rmail-summary-previous-all
(
&optional
number
)
(
interactive
"p"
)
(
forward-line
(
-
(
if
number
number
1
)))
;; It doesn't look nice to move forward past the last message line.
(
and
(
eobp
)
(
<
number
0
)
(
forward-line
-1
))
(
display-buffer
rmail-buffer
))
(
defun
rmail-summary-next-msg
(
&optional
number
)
...
...
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