diff options
| author | Michael Kifer <kifer@cs.stonybrook.edu> | 2008-01-10 06:54:12 +0000 |
|---|---|---|
| committer | Michael Kifer <kifer@cs.stonybrook.edu> | 2008-01-10 06:54:12 +0000 |
| commit | acb93bb2a68eac61448a2da39e9f7f0b14d6869b (patch) | |
| tree | 8fddf5d4d4fd25c4c1e05a52e25a5c50c98ff6e8 /lisp/emulation/viper-cmd.el | |
| parent | c0323133334f70c2e25f4ace22084e3696bf2a5a (diff) | |
| download | emacs-acb93bb2a68eac61448a2da39e9f7f0b14d6869b.tar.gz emacs-acb93bb2a68eac61448a2da39e9f7f0b14d6869b.tar.bz2 emacs-acb93bb2a68eac61448a2da39e9f7f0b14d6869b.zip | |
2008-01-10 Michael Kifer <kifer@cs.stonybrook.edu>
* ediff*.el: uncommented declare-function.
* viper*.el: uncommented declare-function.
Diffstat (limited to 'lisp/emulation/viper-cmd.el')
| -rw-r--r-- | lisp/emulation/viper-cmd.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/emulation/viper-cmd.el b/lisp/emulation/viper-cmd.el index fbebacb16b5..68116cde092 100644 --- a/lisp/emulation/viper-cmd.el +++ b/lisp/emulation/viper-cmd.el @@ -47,6 +47,9 @@ (defvar initial) (defvar undo-beg-posn) (defvar undo-end-posn) + +(eval-and-compile + (unless (fboundp 'declare-function) (defmacro declare-function (&rest r)))) ;; end pacifier @@ -3083,10 +3086,9 @@ On reaching beginning of line, stop and signal error." (setq this-command 'next-line) (if com (viper-execute-com 'viper-next-line val com)))) -;; declare-function is not defined in XEmacs -;;(declare-function widget-type "wid-edit" (widget)) -;;(declare-function widget-button-press "wid-edit" (pos &optional event)) -;;(declare-function viper-set-hooks "viper" ()) +(declare-function widget-type "wid-edit" (widget)) +(declare-function widget-button-press "wid-edit" (pos &optional event)) +(declare-function viper-set-hooks "viper" ()) (defun viper-next-line-at-bol (arg) "Next line at beginning of line. |