maciej/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Revert to older version of set-width functions

Browse source
This commit is contained in:
Maciej Szlosarczyk 2017-05-26 01:10:39 +03:00
parent ed90e42076
commit fbc43e54cb
No known key found for this signature in database
GPG key ID: 0D4EEACF63D4262E
3 changed files with 37 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

28
behaviour.el
View file

@ -87,15 +87,35 @@
(delete-selection-mode 1)
;;;;;;;;;;;;;;;;;;;;;; indentation functions ;;;;;;;;;;;;;;;;;;;;;;
;;; NB! This does not work reliably, using the functions below
(defun set-width (columns)
"Set line length to X COLUMNS.
Additional characters after X are highlighted."
"Set line length to X COLUMNS."
(interactive "NNumber of columns to use: ")
(setq column-enforce-column columns)
(column-enforce-mode -1)
(column-enforce-mode 1))
(defun set-width-99 ()
"Set line length to 99 columns."
(interactive)
(setq column-enforce-column 99)
(column-enforce-mode -1)
(column-enforce-mode 1))
(defun set-width-80 ()
"Set line length to 80 columns."
(interactive)
(setq column-enforce-column 80)
(column-enforce-mode -1)
(column-enforce-mode 1))
(defun set-width-120 ()
"Set line length to 120 columns."
(interactive)
(setq column-enforce-column 120)
(column-enforce-mode -1)
(column-enforce-mode 1))
(defun set-indent (step)
"Set indentation to X STEPs."
(interactive "NNumber of columns for one step: ")
@ -140,7 +160,7 @@ Additional characters after X are highlighted."
;; Add magit for git
(require 'evil-magit)
;; Remove unused buffers every 2 hours
;; Remove unused buffers periodically
(require 'midnight)
;;kill buffers if they were last disabled more than this seconds ago