contrapunctus
/
dotemacs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Remove old linewrapping code

This commit is contained in:
contrapunctus 2020-04-23 14:26:47 +05:30
parent de00b3c449
commit 5635e68c34
1 changed files with 5 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
init.el
View File

@ -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 ()