2012-12-18 05:48:12 +00:00
|
|
|
(require 'fill-column-indicator)
|
|
|
|
|
|
2013-04-23 19:56:44 +00:00
|
|
|
(setq fci-rule-column 79)
|
|
|
|
|
(setq fci-rule-width 1)
|
|
|
|
|
(setq fci-enabled 0)
|
2012-12-18 05:48:12 +00:00
|
|
|
|
2013-04-23 19:56:44 +00:00
|
|
|
(defun toggle-fill-column-indicator ()
|
|
|
|
|
(interactive)
|
|
|
|
|
(make-local-variable 'fci-enabled)
|
|
|
|
|
(if (> fci-enabled 0) (deactivate-fci) (activate-fci)))
|
|
|
|
|
|
|
|
|
|
(defun activate-fci ()
|
|
|
|
|
(setq fci-enabled 1)
|
|
|
|
|
(fci-mode 1))
|
|
|
|
|
|
|
|
|
|
(defun deactivate-fci ()
|
|
|
|
|
(setq fci-enabled 0)
|
|
|
|
|
(fci-mode 0))
|
