colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix indent for multiple-cursors-bind

Browse Source
This commit is contained in:
Ivan Malison 2016-05-12 14:18:03 -07:00
parent 12ed7dd08b
commit 8c949d3c6d
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
dotfiles/emacs.d/init.el
View File

@ -259,7 +259,7 @@
(defmacro imalison:dynamic-let-advise-around (name &rest getters) (defmacro imalison:dynamic-let-advise-around (name &rest getters)
`(defun ,name (orig-func &rest args) `(defun ,name (orig-func &rest args)
(let ,(cl-loop for pair in getters (let ,(cl-loop for pair in getters
collect `(,(car pair) (funcall ,(cadr pair)))) collect `(,(car pair) (funcall (quote ,(cadr pair)))))
(apply orig-func args)))) (apply orig-func args))))
(defun imalison:uuid () (defun imalison:uuid ()
@ -894,13 +894,13 @@ buffer is not visiting a file."
:config :config
(define-key mc/keymap (kbd "C-. =") 'mc/compare-chars))) (define-key mc/keymap (kbd "C-. =") 'mc/compare-chars)))
:bind :bind
(("C-c m a" . mc/mark-all-like-this) (("C-c m a" . mc/mark-all-like-this)
("C-c m m" . mc/mark-all-like-this-dwim) ("C-c m m" . mc/mark-all-like-this-dwim)
("C-c m l" . mc/edit-lines) ("C-c m l" . mc/edit-lines)
("C-c m n" . mc/mark-next-like-this) ("C-c m n" . mc/mark-next-like-this)
("C-c m p" . mc/mark-previous-like-this) ("C-c m p" . mc/mark-previous-like-this)
("C-c m s" . mc/mark-sgml-tag-pair) ("C-c m s" . mc/mark-sgml-tag-pair)
("C-c m d" . mc/mark-all-like-this-in-defun))) ("C-c m d" . mc/mark-all-like-this-in-defun)))
(use-package undo-tree (use-package undo-tree
:disabled t ;; this has been getting pretty annoying :disabled t ;; this has been getting pretty annoying