modified: onetime function to lambda

ncaq · May 12, 2015 · 273a0b6 · 273a0b6
1 parent f7bfc24
commit 273a0b6
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 4 deletions.
diff --git a/profile/20_whitespace.el b/profile/20_whitespace.el
@@ -24,7 +24,4 @@
   (interactive)
   (setq-local whitespace-action (remove 'auto-cleanup whitespace-action)))
 
-(defun whitespace-clean-disable (h)
-  (add-hook h 'whitespace-cleanup-turn-off))
-
-(mapc 'whitespace-clean-disable whitespace-cleanup-disabled-hooks)
+(mapc (lambda (h)(add-hook h 'whitespace-cleanup-turn-off)) whitespace-cleanup-disabled-hooks)
diff --git a/profile/20_whitespace.elc b/profile/20_whitespace.elc