From 5a5b0c4a566792c0bd8f793c4a49a1f1467b1d96 Mon Sep 17 00:00:00 2001 From: Alan Pearce Date: Sat, 11 Jan 2014 16:57:01 +0000 Subject: Emacs: remove with-elapsed-timer call --- emacs/init.el | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) (limited to 'emacs/init.el') diff --git a/emacs/init.el b/emacs/init.el index 70882c2..f78839e 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -150,12 +150,11 @@ Values: `desktop', `server', `laptop'") (set-face-font 'variable-pitch (concat variable-face "-" (number-to-string (1+ font-size))))))))) -(with-elapsed-timer "Setting up font styles" - (let* ((font-height (face-attribute 'default :height)) - (small-font-height (max 1 (floor (* .917 font-height))))) +(let* ((font-height (face-attribute 'default :height)) + (small-font-height (max 1 (floor (* .917 font-height))))) (mapc (lambda (item) - (put (car item) 'customized-face (cadr item)) - (face-spec-set (car item) (cadr item))) + (put (car item) 'customized-face (cadr item)) + (face-spec-set (car item) (cadr item))) `((linum ((t (:height ,small-font-height :foreground unspecified @@ -216,7 +215,7 @@ Values: `desktop', `server', `laptop'") :inherit 'fixed-pitch)))) (org-done ((t (:weight normal :strike-through t)))) - (org-headline-done ((t (:strike-through t)))))))) + (org-headline-done ((t (:strike-through t))))))) ;;;; Autosaves & Backups (let ((backup-dir (expand-file-name "~/.emacs.d/backups/"))) -- cgit 1.4.1