Browse Source

Set macro indent using declare

pull/15/head
10sr 9 years ago
parent
commit
a9d0136ddc
1 changed files with 1 additions and 1 deletions
  1. +1
    -1
      emacs.el

+ 1
- 1
emacs.el View File

@@ -52,6 +52,7 @@ the function same as FEATURE is defined as autoloaded function. BODY is passed
to `eval-after-load'. to `eval-after-load'.
After this macro is expanded, this returns the path to library if FEATURE After this macro is expanded, this returns the path to library if FEATURE
found, otherwise returns nil." found, otherwise returns nil."
(declare (indent 2) (debug t))
(let* ((libname (symbol-name (eval feature))) (let* ((libname (symbol-name (eval feature)))
(libpath (locate-library libname))) (libpath (locate-library libname)))
`(progn `(progn
@@ -74,7 +75,6 @@ found, otherwise returns nil."
(quote (progn (quote (progn
,@body))) ,@body)))
(locate-library ,libname)))) (locate-library ,libname))))
(put 'autoload-eval-lazily 'lisp-indent-function 2)


(when (autoload-eval-lazily 'tetris nil (when (autoload-eval-lazily 'tetris nil
(message "Tetris loaded!")) (message "Tetris loaded!"))


Loading…
Cancel
Save