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
07f4ea75
Commit
07f4ea75
authored
Sep 04, 1992
by
Richard M. Stallman
Browse files
entered into RCS
parent
16c15321
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
7 additions
and
0 deletions
+7
-0
lisp/textmodes/page.el
lisp/textmodes/page.el
+3
-0
src/commands.h
src/commands.h
+4
-0
No files found.
lisp/textmodes/page.el
View file @
07f4ea75
...
...
@@ -29,6 +29,9 @@ A page boundary is any line whose beginning matches the regexp
(
interactive
"p"
)
(
or
count
(
setq
count
1
))
(
while
(
and
(
>
count
0
)
(
not
(
eobp
)))
;; In case the page-delimiter matches the null string,
;; don't find a match without moving.
(
if
(
bolp
)
(
forward-char
1
))
(
if
(
re-search-forward
page-delimiter
nil
t
)
nil
(
goto-char
(
point-max
)))
...
...
src/commands.h
View file @
07f4ea75
...
...
@@ -45,6 +45,10 @@ extern Lisp_Object Vminibuffer_local_must_match_map;
/* Last character of last key sequence. */
extern
Lisp_Object
last_command_char
;
/* Last input character read as a command, not counting menus
reached by the mouse. */
extern
Lisp_Object
last_nonmenu_event
;
/* Command character to be re-read, or -1 */
extern
int
unread_command_char
;
...
...
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