From cc3fef14515bce4657f9833a2be16ad5dcda8e10 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 28 Nov 2012 13:45:57 +0900 Subject: [PATCH] form -> body --- emacs.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/emacs.el b/emacs.el index a64335c..e3ac834 100644 --- a/emacs.el +++ b/emacs.el @@ -72,10 +72,10 @@ otherwise the path where the library installed." ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; autoload -(defmacro lazy-load-eval (feature &optional functions &rest form) +(defmacro lazy-load-eval (feature &optional functions &rest body) "Define FUNCTIONS to autoload from FEATURE. FEATURE is a symbol. FUNCTIONS is a list of symbols. If FUNCTIONS is nil, -the function same as FEATURE is defined as autoloaded function. FORM is passed +the function same as FEATURE is defined as autoloaded function. BODY is passed to `eval-after-load'. When this macro is evaluated, this returns the path to library if FEATURE found, otherwise returns nil." @@ -93,9 +93,8 @@ found, otherwise returns nil." `(,(eval feature)))) (eval-after-load ,feature '(progn - ,@form)) + ,@body)) ,libpath))) - (put 'lazy-load-eval 'lisp-indent-function 2) ;; (macroexpand '(f-autoload 'autosave '(a-f b-f) (message "1") (message "2")))