martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make toggle-truncate-lines disable visual-line-mode

Browse Source 
* lisp/simple.el (toggle-truncate-lines): Disable
`visual-line-mode' (bug#29664).
This commit is contained in:
Lars Ingebrigtsen
2021-09-03 08:36:03 +02:00
parent 0034067f47
commit 0d3ae350c9
1 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/simple.el
View File

@@ -8306,8 +8306,13 @@ non-nil."
(if (eq buffer (window-buffer window))
(set-window-hscroll window 0)))
nil t)))
(message "Truncate long lines %s"
(if truncate-lines "enabled" "disabled")))
(message "Truncate long lines %s%s"
(if truncate-lines "enabled" "disabled")
(if (and truncate-lines visual-line-mode)
(progn
(visual-line-mode -1)
(message " and `visual-line-mode' disabled"))
"")))
(defun toggle-word-wrap (&optional arg)
"Toggle whether to use word-wrapping for continuation lines.