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
e51c889c
Commit
e51c889c
authored
Mar 18, 2002
by
Richard M. Stallman
Browse files
(menu-bar-options-menu): Cope if text-mode-hook is not a list.
parent
506280c3
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
1 deletion
+3
-1
lisp/menu-bar.el
lisp/menu-bar.el
+3
-1
No files found.
lisp/menu-bar.el
View file @
e51c889c
...
...
@@ -782,7 +782,9 @@ Do the same for the keys of the same name."
;; -- Per Abrahamsen <abraham@dina.kvl.dk> 2002-02-11.
(
customize-mark-as-set
'text-mode-hook
))
:help
"Automatically fill text between left and right margins"
:button
(
:toggle
.
(
member
'turn-on-auto-fill
text-mode-hook
))))
:button
(
:toggle
.
(
if
(
listp
text-mode-hook
)
(
member
'turn-on-auto-fill
text-mode-hook
)
(
eq
'turn-on-auto-fill
text-mode-hook
)))))
(
define-key
menu-bar-options-menu
[truncate-lines]
'
(
menu-item
"Truncate Long Lines in this Buffer"
(
lambda
()
...
...
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