summaryrefslogtreecommitdiff
path: root/init/km-func.el
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2014-01-25 00:48:21 -0500
committerKyle Meyer <kyle@kyleam.com>2014-01-25 01:04:40 -0500
commit2c0c1f970899389025281e8968e3517fa32668d8 (patch)
tree1199bbbcd8fdf0b82b6c75ef0a65012e2d22e865 /init/km-func.el
parent1805b9124237248038fd9793fa5bbd8ba5274a72 (diff)
downloademacs.d-2c0c1f970899389025281e8968e3517fa32668d8.tar.gz
Clean up init files
Diffstat (limited to 'init/km-func.el')
-rw-r--r--init/km-func.el16
1 files changed, 8 insertions, 8 deletions
diff --git a/init/km-func.el b/init/km-func.el
index b4f670d..c772c30 100644
--- a/init/km-func.el
+++ b/init/km-func.el
@@ -1,11 +1,11 @@
;; http://whattheemacsd.com/
;; whitespace cleanup
-;; buffer-specific prevention modified from
+;; Buffer-specific prevention modified from
;; http://stackoverflow.com/questions/14913398/
-;; in-emacs-how-do-i-save-without-running-save-hooks
-(defvar km/prevent-cleanup nil
- "If set, `km/cleanup-buffer' does not perform clean up on save")
+;; in-emacs-how-do-i-save-without-running-save-hooks.
+(defcustom km/prevent-cleanup nil
+ "If set, `km/cleanup-buffer' does not perform clean up on save.")
(defun km/toggle-prevent-cleanup ()
"Toggle state of `km/prevent-cleanup'"
@@ -102,7 +102,7 @@ user."
(comment-region beg (+ end 5))
(forward-line))))
-;; kill functions
+;; Kill functions
(defun km/kill-string-at-point ()
(interactive)
@@ -143,7 +143,7 @@ KILLARG."
(define-key kill-map "l" 'km/kill-line-at-point)
(defun km/join-next-line-with-space ()
- "Join current line to the next line with a space in between"
+ "Join current line to the next line with a space in between."
(interactive)
(move-end-of-line 1)
(kill-line)
@@ -152,14 +152,14 @@ KILLARG."
(define-key kill-map "j" 'km/join-next-line-with-space)
(defadvice recompile (around restore-windows)
- "Prevent recompiling from spawning new windows"
+ "Prevent recompiling from spawning new windows."
(save-window-excursion
ad-do-it))
(ad-activate 'recompile)
(global-set-key (kbd "C-c g") 'recompile)
-;; from prelude
+;; From prelude
(defun km/swap-windows ()
"If you have 2 windows, it swaps them."
(interactive)