From 707d0ab2ae1213f53494e29f2e421e81aecc6cb6 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Sun, 19 Jan 2014 03:13:02 +0900 Subject: [PATCH] little improvement of lazy-load-eval --- emacs.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/emacs.el b/emacs.el index 4bdaf1d..f4a7e91 100644 --- a/emacs.el +++ b/emacs.el @@ -53,7 +53,8 @@ If FORCE-DOWNLOAD-P it t ignore exisiting library and always download." (locate-library lib))) (defun download-file (url path &optional ok-if-already-exists) - "Download file from URL and output to PATH." + "Download file from URL and output to PATH. +IF OK-IF-ALREADY-EXISTS is true force download." (or (let ((curl (executable-find "curl"))) (when curl @@ -140,7 +141,8 @@ found, otherwise returns nil." (eval-after-load ,feature (quote (progn ,@body))) - ,libpath)))) + (locate-library ,libname))))) + (put 'lazy-load-eval 'lisp-indent-function 2) (when (lazy-load-eval 'tetris nil