Do not use fill-column indicator on large files

This commit is contained in:
Wojciech Kozlowski 2017-08-30 01:12:14 +01:00
parent da2606291b
commit 299b2eef9d

View File

@ -52,11 +52,18 @@
;; Column indicator. ;; Column indicator.
;; -------------------------------------------------------------------------- ;; --------------------------------------------------------------------------
(defun fci-mode-unless-large-file ()
"Enable fci-mode unless the file is too large."
(interactive)
(unless (> (count-lines (point-min) (point-max)) 9999)
(fci-mode)))
(use-package fill-column-indicator (use-package fill-column-indicator
:defer t :defer t
:init :init
(add-hook 'prog-mode-hook 'fci-mode) (add-hook 'prog-mode-hook 'fci-mode-unless-large-file)
(add-hook 'text-mode-hook 'fci-mode)) (add-hook 'text-mode-hook 'fci-mode-unless-large-file))
;; -------------------------------------------------------------------------- ;; --------------------------------------------------------------------------
;; Rainbow mode. ;; Rainbow mode.