EMACS: I can use let* instead of 2x let

This commit is contained in:
Tom Willemsen 2011-09-14 20:15:49 +02:00
parent b804526353
commit 4f0850d764

View file

@ -55,10 +55,10 @@
(delete-trailing-whitespace)))
(defun oni/after-save-hook ()
(let ((fname (buffer-file-name)))
(let ((suffix (file-name-extension fname)))
(let* ((fname (buffer-file-name))
(suffix (file-name-extension fname)))
(if (string-equal suffix "el")
(byte-compile-file fname)))))
(byte-compile-file fname))))
(defun oni/pretty-lambdas ()
(font-lock-add-keywords
@ -395,7 +395,7 @@
(global-set-key [f12] 'ide-skel-toggle-right-view-window)
;;-----[ Misc ]----------------------------------------------------------
(defun oni/reload-buffer
(defun oni/reload-buffer ()
(interactive)
(revert-buffer nil t nil))