From 5635e68c343f7082b9966a0691b2d75e09ef9c37 Mon Sep 17 00:00:00 2001 From: contrapunctus Date: Thu, 23 Apr 2020 14:26:47 +0530 Subject: [PATCH] Remove old linewrapping code --- init.el | 30 +++++------------------------- 1 file changed, 5 insertions(+), 25 deletions(-) diff --git a/init.el b/init.el index 355db17..3199bff 100644 --- a/init.el +++ b/init.el @@ -429,31 +429,11 @@ FILE-1 will appear above FILE-2." ;; (prefer-coding-system 'utf-8) ;;;; Linewrapping -;; (defun line-trunc-set () -;; (visual-line-mode -1) -;; ;(setq-default truncate-partial-width-windows t) -;; ;(setq-default truncate-lines t)) -;; (setq truncate-partial-width-windows t) -;; (setq truncate-lines t)) -;; ;; (defun line-trunc-set () -;; ;; (interactive) -;; ;; (if (or truncate-lines -;; ;; visual-line-mode) -;; ;; (progn -;; ;; (visual-line-mode -1) -;; ;; (setq truncate-lines t)) -;; ;; (progn -;; ;; (visual-line-mode 1) -;; ;; (setq truncate-lines nil)))) -;; ;(add-hook 'text-mode-hook 'line-trunc-set) -;; (add-hook 'emacs-lisp-mode-hook 'line-trunc-set) -;; (add-hook 'org-mode-hook 'visual-line-mode) -;; (add-hook 'erc-mode-hook 'visual-line-mode) -;; ;(global-set-key (kbd "C-x t") 'toggle-truncate-lines) - -;; 2018-07-26T19:57:29+0530 -(add-hook 'markdown-mode-hook #'(lambda () (visual-fill-column-mode t))) -(add-hook 'text-mode-hook #'(lambda () (visual-line-mode t))) +(add-hook 'org-mode-hook 'visual-line-mode) +(add-hook 'erc-mode-hook 'visual-line-mode) +;(global-set-key (kbd "C-x t") 'toggle-truncate-lines) +(add-hook 'markdown-mode-hook 'visual-fill-column-mode) +(add-hook 'text-mode-hook 'visual-line-mode) (load "cp-md") (defun cp/turn-on-truncate-lines ()