mirrors
/
ambevar-dotfiles
mirror of https://gitlab.com/ambrevar/dotfiles/
1
0
Fork 0
Code Issues Releases Wiki Activity

Emacs: Fix namespace of move-borer-* functions

master
Pierre Neidhardt 2018-02-18 11:49:14 +01:00
parent e45f102f22
commit cd5be6b932
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
.emacs.d/lisp/functions.el
View File

@ -136,8 +136,8 @@ horizontally. Otherwise, default to enlarging horizontally.\n
Enlarge/Shrink by ARG columns, or 5 if ARG is nil."
(interactive "P")
(if (= (count-windows) 2)
(move-border-left-or-right arg t)))
(global-set-key (kbd "M-(") 'move-border-left)
(ambrevar/move-border-left-or-right arg t)))
(global-set-key (kbd "M-(") 'ambrevar/move-border-left)
(defun ambrevar/move-border-left-or-right (arg dir-left)
"Wrapper around ‘move-border-left’ and ‘move-border-right’.
@ -156,8 +156,8 @@ If DIR-LEFT is t, then move left, otherwise move right."
"See `move-border-left'."
(interactive "P")
(if (= (count-windows) 2)
(move-border-left-or-right arg nil)))
(global-set-key (kbd "M-)") 'move-border-right)
(ambrevar/move-border-left-or-right arg nil)))
(global-set-key (kbd "M-)") 'ambrevar/move-border-right)
(defun ambrevar/reset-fill-column ()
"Reset `fill-column' to its default value."