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
8803c4f4
Commit
8803c4f4
authored
Apr 10, 2006
by
Richard M. Stallman
Browse files
(picture-mode-exit): Run picture-mode-exit-hook.
parent
6c230417
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
13 additions
and
3 deletions
+13
-3
lisp/ChangeLog
lisp/ChangeLog
+8
-0
lisp/textmodes/picture.el
lisp/textmodes/picture.el
+5
-3
No files found.
lisp/ChangeLog
View file @
8803c4f4
2006-04-09 Richard Stallman <rms@gnu.org>
* textmodes/picture.el (picture-mode-exit): Run picture-mode-exit-hook.
* play/landmark.el (lm-font-lock-face-O, lm-font-lock-face-X):
Make them faces.
(lm-font-lock-keywords): Update appropriately.
2006-04-10 Kim F. Storm <storm@cua.dk>
* simple.el (filter-buffer-substring): Add NOPROPS arg, so
...
...
lisp/textmodes/picture.el
View file @
8803c4f4
...
...
@@ -758,8 +758,9 @@ they are not defaultly assigned to keys."
(defun picture-mode-exit (&optional nostrip)
"
Undo
`
picture-mode
'
and
return
to
previous
major
mode.
With
no
argument
strips
whitespace
from
end
of
every
line
in
Picture
buffer
otherwise
just
return
to
previous
mode.
"
With
no
argument,
strip
whitespace
from
end
of
every
line
in
Picture
buffer
;
otherwise,
just
return
to
previous
mode.
Runs
`
picture-mode-exit-hook
'
at
the
end.
"
(interactive "
P
")
(if (not (eq major-mode 'picture-mode))
(error "
You
aren
't
editing
a
Picture
"
)
...
...
@@ -769,7 +770,8 @@ With no argument strips whitespace from end of every line in Picture buffer
(
setq
major-mode
picture-mode-old-major-mode
)
(
kill-local-variable
'tab-stop-list
)
(
setq
truncate-lines
picture-mode-old-truncate-lines
)
(
force-mode-line-update
)
))
(
force-mode-line-update
)
(
run-hooks
'picture-mode-exit-hook
)
))
(
provide
'picture
)
...
...
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