15 lines
453 B
EmacsLisp
15 lines
453 B
EmacsLisp
;;; Functions -- summary
|
|
;;; Commentary:
|
|
;;; Code:
|
|
(defun kill-other-buffers ()
|
|
"Kill all buffers except for the current one."
|
|
(interactive)
|
|
(mapc 'kill-buffer (delq (current-buffer) (buffer-list)))
|
|
)
|
|
|
|
(defun align-to-colon (begin end)
|
|
"Align region from BEGIN to END according to colon signs."
|
|
(interactive "r")
|
|
(align-regexp begin end
|
|
(rx ":" (group (zero-or-more (syntax whitespace))) ) 1 1))
|
|
;;; functions.el ends here
|