Set fill-column for HTML to 120.

This commit is contained in:
tastytea 2019-04-26 11:34:30 +02:00
parent f570d2b48d
commit fcba9657d1

View File

@ -1,5 +1,5 @@
;;; init.el --- tastytea's Emacs init file. ;;; init.el --- tastytea's Emacs init file.
;; Time-stamp: <2019-04-25T21:28:05+00:00> ;; Time-stamp: <2019-04-26T09:31:26+00:00>
;;; Commentary: ;;; Commentary:
;; I am using this file with Emacs 26, but most of it will probably work with ;; I am using this file with Emacs 26, but most of it will probably work with
@ -105,6 +105,10 @@
"Set fill-column to 80." "Set fill-column to 80."
(set-fill-column 80)) (set-fill-column 80))
(defun my/set-fill-column-120 ()
"Set fill-column to 120."
(set-fill-column 120))
;; kill-region (cut) and kill-ring-save (copy) act on the current line if no ;; kill-region (cut) and kill-ring-save (copy) act on the current line if no
;; text is visually selected. ;; text is visually selected.
;; https://www.emacswiki.org/emacs/WholeLineOrRegion ;; https://www.emacswiki.org/emacs/WholeLineOrRegion
@ -125,6 +129,7 @@
:hook :hook
(prog-mode . my/set-fill-column-80) (prog-mode . my/set-fill-column-80)
(conf-mode . my/set-fill-column-80) (conf-mode . my/set-fill-column-80)
(html-mode . my/set-fill-column-120)
(text-mode . auto-fill-mode)) ; Enable word-wrapping at fill-column. (text-mode . auto-fill-mode)) ; Enable word-wrapping at fill-column.
;; Save cursor position. ;; Save cursor position.