Selectively enable visual-line-mode

diff --git a/init.el b/init.el
index 024641dff81806c36ff358f73bc128233177fb4d..773c92ccef813bc496024bd208092413dadc407c 100644 (file)
--- a/init.el
+++ b/init.el
@@ -45,8 +45,17 @@
 \f
 ;; Buffer dealiŋ
 (setq-default indicate-empty-lines t
+             truncate-lines t
              fill-column 78)
 
+(defvar *re/vlm-hooks*
+  '(org-mode-hook
+    markdown-mode-hook
+    LaTeX-mode-hook))
+
+(dolist (hook *re/vlm-hooks*)
+  (add-hook hook #'visual-line-mode))
+
 (add-to-list 'display-buffer-alist
             '("^\\*eldoc" display-buffer-in-direction
               (direction . 'down)
@@ -244,6 +253,7 @@
 (add-hook 'howm-mode-hook #'abbrev-mode)
 \f
 ;; Customization framework
-(setq custom-file (make-temp-file "emacs-custom-")) ; Disable by making a temp file (stolen from prot)
+;; Disable by making a temp file (stolen from prot)
+(setq custom-file (make-temp-file "emacs-custom-"))
 
 ;;; init.el ends here

diff --git a/re/re-packages.el b/re/re-packages.el
index e406af650b19ea10ea5b006e4972428c341939fe..199ae15f6f6985bc41ab101c15ced142336b8333 100644 (file)
--- a/re/re-packages.el
+++ b/re/re-packages.el
@@ -22,16 +22,6 @@
   (diminish 'aggressive-indent-mode)
   (diminish 'page-break-lines-mode))
 
-(use-package visual-fill-column
-  :config
-  (add-hook 'text-mode-hook #'visual-line-mode)
-  :custom
-  (word-wrap t)
-  (visual-line-fringe-indicators '(left-curly-arrow right-curly-arrow))
-  (visual-fill-column-enable-sensible-window-split t)
-  :bind
-  (("C-c v" . visual-fill-column-mode)))
-
 (use-package corfu
   :custom
   (corfu-auto t)