diff options
| author | Vegard Øye <vegard_oye@hotmail.com> | 2012-08-05 16:51:59 +0800 |
|---|---|---|
| committer | Chong Yidong <cyd@gnu.org> | 2012-08-05 16:51:59 +0800 |
| commit | d5c31f1ddd83e958d4b944d7aa94302359f8ecf9 (patch) | |
| tree | 5741b799e602b4af7484b7d53bf99793084d2ed1 /lisp/emulation/viper-init.el | |
| parent | f0422feb64518e6a787346fa934ad1e1744435c6 (diff) | |
| download | emacs-d5c31f1ddd83e958d4b944d7aa94302359f8ecf9.tar.gz emacs-d5c31f1ddd83e958d4b944d7aa94302359f8ecf9.tar.bz2 emacs-d5c31f1ddd83e958d4b944d7aa94302359f8ecf9.zip | |
Add declares for viper-deflocalvar and viper-loop.
* lisp/emulation/viper-init.el (viper-deflocalvar): Add docstring and
indentation declaration.
(viper-loop): Add indentation declaration.
Fixes: debbugs:7025
Diffstat (limited to 'lisp/emulation/viper-init.el')
| -rw-r--r-- | lisp/emulation/viper-init.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/emulation/viper-init.el b/lisp/emulation/viper-init.el index 9f0826bf515..c482a88de1a 100644 --- a/lisp/emulation/viper-init.el +++ b/lisp/emulation/viper-init.el @@ -96,6 +96,10 @@ In all likelihood, you don't need to bother with this setting." ;;; Macros (defmacro viper-deflocalvar (var default-value &optional documentation) + "Define VAR as a buffer-local variable. +DEFAULT-VALUE is the default value, and DOCUMENTATION is the +docstring. The variable becomes buffer-local whenever set." + (declare (indent defun)) `(progn (defvar ,var ,default-value ,(format "%s\n\(buffer local\)" documentation)) @@ -103,6 +107,7 @@ In all likelihood, you don't need to bother with this setting." ;; (viper-loop COUNT BODY) Execute BODY COUNT times. (defmacro viper-loop (count &rest body) + (declare (indent defun)) `(let ((count ,count)) (while (> count 0) ,@body |