From 8c949d3c6d681d947aed07d622c9accff2ed8d1f Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Thu, 12 May 2016 14:18:03 -0700 Subject: [PATCH] fix indent for multiple-cursors-bind --- dotfiles/emacs.d/init.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/dotfiles/emacs.d/init.el b/dotfiles/emacs.d/init.el index a0398c2b..8c7331db 100644 --- a/dotfiles/emacs.d/init.el +++ b/dotfiles/emacs.d/init.el @@ -259,7 +259,7 @@ (defmacro imalison:dynamic-let-advise-around (name &rest getters) `(defun ,name (orig-func &rest args) (let ,(cl-loop for pair in getters - collect `(,(car pair) (funcall ,(cadr pair)))) + collect `(,(car pair) (funcall (quote ,(cadr pair))))) (apply orig-func args)))) (defun imalison:uuid () @@ -894,13 +894,13 @@ buffer is not visiting a file." :config (define-key mc/keymap (kbd "C-. =") 'mc/compare-chars))) :bind - (("C-c m a" . mc/mark-all-like-this) - ("C-c m m" . mc/mark-all-like-this-dwim) - ("C-c m l" . mc/edit-lines) - ("C-c m n" . mc/mark-next-like-this) - ("C-c m p" . mc/mark-previous-like-this) - ("C-c m s" . mc/mark-sgml-tag-pair) - ("C-c m d" . mc/mark-all-like-this-in-defun))) + (("C-c m a" . mc/mark-all-like-this) + ("C-c m m" . mc/mark-all-like-this-dwim) + ("C-c m l" . mc/edit-lines) + ("C-c m n" . mc/mark-next-like-this) + ("C-c m p" . mc/mark-previous-like-this) + ("C-c m s" . mc/mark-sgml-tag-pair) + ("C-c m d" . mc/mark-all-like-this-in-defun))) (use-package undo-tree :disabled t ;; this has been getting pretty annoying