From 9281a9b985f82eb0c1a64fd1a940b1c9bce3186b Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 19 Jun 2015 16:08:58 +0200 Subject: [PATCH] Clean up defuns --- core/lib/defuns-compile.el | 2 +- core/lib/defuns-whitespace.el | 1 - 2 files changed, 1 insertion(+), 2 deletions(-) diff --git a/core/lib/defuns-compile.el b/core/lib/defuns-compile.el index 5b60e6848..ae10f4095 100644 --- a/core/lib/defuns-compile.el +++ b/core/lib/defuns-compile.el @@ -1,6 +1,6 @@ ;;; defuns-compile.el -(! (require 'f)) +(eval-when-compile (require 'f)) (defun narf--compile-important-dirs () (append (list narf-core-dir narf-contrib-dir) diff --git a/core/lib/defuns-whitespace.el b/core/lib/defuns-whitespace.el index 7632dc7e9..03a4a1db3 100644 --- a/core/lib/defuns-whitespace.el +++ b/core/lib/defuns-whitespace.el @@ -160,7 +160,6 @@ spaces on either side of the point if so. Resorts to (if (memq 'delete-trailing-whitespace before-save-hook) (progn (message "Remove trailing whitespace: OFF") (remove-hook 'before-save-hook 'delete-trailing-whitespace)) - (message "Remove trailing whitespace: ON") (add-hook 'before-save-hook 'delete-trailing-whitespace)))