summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKyle Meyer <kyle@kyleam.com>2014-11-20 21:56:19 -0500
committerKyle Meyer <kyle@kyleam.com>2014-11-20 21:56:19 -0500
commitca639749d61a73319b3b3a4650c5fc3fa00c01c7 (patch)
treeca5155d98dad1c77a411295e4bf205c92811d3ec /lisp
parentc580c32e8a4831439a67679db01e8ef92c47b500 (diff)
downloademacs.d-ca639749d61a73319b3b3a4650c5fc3fa00c01c7.tar.gz
Stop quoting lambdas
Diffstat (limited to 'lisp')
-rw-r--r--lisp/init-git.el2
-rw-r--r--lisp/init-gnus.el5
-rw-r--r--lisp/init-ido.el4
-rw-r--r--lisp/init-org.el6
-rw-r--r--lisp/init-snakemake.el6
-rw-r--r--lisp/init-text.el6
6 files changed, 14 insertions, 15 deletions
diff --git a/lisp/init-git.el b/lisp/init-git.el
index dec7309..496892a 100644
--- a/lisp/init-git.el
+++ b/lisp/init-git.el
@@ -45,7 +45,7 @@ This is useful for commit IDs in files and log messages."
(interactive)
(--when-let (thing-at-point 'word)
(let ((projectile-switch-project-action
- '(lambda () (magit-show-commit it))))
+ (lambda () (magit-show-commit it))))
(projectile-switch-project))))
(defun km/magit-commit-extend-all ()
diff --git a/lisp/init-gnus.el b/lisp/init-gnus.el
index 79ad916..e2156d7 100644
--- a/lisp/init-gnus.el
+++ b/lisp/init-gnus.el
@@ -84,8 +84,7 @@
(add-hook 'gnus-group-mode-hook 'gnus-topic-mode)
(add-hook 'message-mode-hook
- '(lambda ()
- (flyspell-mode 1)))
+ (lambda () (flyspell-mode 1)))
(defun km/gnus-follow-last-message-link (arg)
"Follow link at bottom of message.
@@ -269,7 +268,7 @@ read. Don't ask to confirm."
(ad-set-arg 0 t))
(defun km/gnus-setup-local-ace-jump ()
- (add-hook 'ace-jump-mode-end-hook '(lambda () (gnus-summary-scroll-up 0))
+ (add-hook 'ace-jump-mode-end-hook (lambda () (gnus-summary-scroll-up 0))
nil t))
(add-hook 'gnus-summary-mode-hook 'km/gnus-setup-local-ace-jump)
diff --git a/lisp/init-ido.el b/lisp/init-ido.el
index 78f6140..7a25f99 100644
--- a/lisp/init-ido.el
+++ b/lisp/init-ido.el
@@ -16,8 +16,8 @@
ido-max-directory-size 100000)
(add-hook 'dired-mode-hook
- '(lambda ()
- (set (make-local-variable 'ido-use-filename-at-point) nil)))
+ (lambda ()
+ (set (make-local-variable 'ido-use-filename-at-point) nil)))
(setq ido-file-extensions-order
'(".org" ".txt" ".md" ".rst" ".tex" ".py" ".el" ".hs"))
diff --git a/lisp/init-org.el b/lisp/init-org.el
index f768bac..cbaab0a 100644
--- a/lisp/init-org.el
+++ b/lisp/init-org.el
@@ -243,9 +243,9 @@ to
(after 'git-commit-mode
(add-hook 'git-commit-setup-hook 'km/load-orgstruct))
-(add-hook 'next-error-hook '(lambda ()
- (when (eq major-mode 'org-mode)
- (org-show-context))))
+(add-hook 'next-error-hook (lambda ()
+ (when (eq major-mode 'org-mode)
+ (org-show-context))))
(defadvice magit-visit
(after magit-visit-show-org-context activate)
diff --git a/lisp/init-snakemake.el b/lisp/init-snakemake.el
index ccf35f8..c3c4a7f 100644
--- a/lisp/init-snakemake.el
+++ b/lisp/init-snakemake.el
@@ -7,9 +7,9 @@
;; mode hook that sets `compile-command', which overides the snakemake
;; version.
(add-hook 'snakemake-mode-hook
- '(lambda ()
- (set (make-local-variable 'compile-command)
- (snakemake-compile-command))))
+ (lambda ()
+ (set (make-local-variable 'compile-command)
+ (snakemake-compile-command))))
(defun km/snakemake-compile-project-file (jobs)
"Run Snakemake to produce project file at point.
diff --git a/lisp/init-text.el b/lisp/init-text.el
index d1509f1..e432272 100644
--- a/lisp/init-text.el
+++ b/lisp/init-text.el
@@ -2,9 +2,9 @@
(setq-default fill-column 72)
-(add-hook 'text-mode-hook '(lambda ()
- (abbrev-mode 1)
- (turn-on-auto-fill)))
+(add-hook 'text-mode-hook (lambda ()
+ (abbrev-mode 1)
+ (turn-on-auto-fill)))
(defun km/export-wrapped-text (arg)
"Export the text in current buffer as wrapped text.