CVS update by michaelk packages/xemacs-packages/viper,
viper-cmd.el ...
xemacs-cvs at xemacs.org
xemacs-cvs at xemacs.org
Thu Jan 10 02:01:34 EST 2008
User: michaelk
Date: 08/01/10 08:01:34
Modified: packages/xemacs-packages/viper viper-util.el viper-keym.el
viper-cmd.el ChangeLog
Log:
* viper*.el: uncommented declare-function.
Revision Changes Path
1.32 +4 -2 XEmacs/packages/xemacs-packages/viper/viper-util.el
Index: viper-util.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/viper-util.el,v
retrieving revision 1.31
retrieving revision 1.32
diff -u -p -r1.31 -r1.32
--- viper-util.el 2008/01/09 06:27:29 1.31
+++ viper-util.el 2008/01/10 07:01:31 1.32
@@ -44,6 +44,9 @@
(require 'ring)
+(eval-and-compile
+ (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
+
;; end pacifier
(require 'viper-init)
@@ -374,8 +377,7 @@
-;; declare-function is not defined in XEmacs
-;;(declare-function viper-forward-Word "viper-cmd" (arg))
+(declare-function viper-forward-Word "viper-cmd" (arg))
;;; Support for :e, :r, :w file globbing
1.20 +6 -4 XEmacs/packages/xemacs-packages/viper/viper-keym.el
Index: viper-keym.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/viper-keym.el,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -p -r1.19 -r1.20
--- viper-keym.el 2008/01/09 06:27:30 1.19
+++ viper-keym.el 2008/01/10 07:01:31 1.20
@@ -33,14 +33,16 @@
(defvar viper-expert-level)
(defvar viper-ex-style-editing)
(defvar viper-ex-style-motion)
+
+(eval-and-compile
+ (unless (fboundp 'declare-function) (defmacro declare-function (&rest r))))
;; end pacifier
(require 'viper-util)
-;; declare-function is not defined in XEmacs
-;;(declare-function viper-ex "viper-ex" (arg &optional string))
-;;(declare-function viper-normalize-minor-mode-map-alist "viper-cmd" ())
-;;(declare-function viper-set-mode-vars-for "viper-cmd" (state))
+(declare-function viper-ex "viper-ex" (arg &optional string))
+(declare-function viper-normalize-minor-mode-map-alist "viper-cmd" ())
+(declare-function viper-set-mode-vars-for "viper-cmd" (state))
;;; Variables
1.43 +6 -4 XEmacs/packages/xemacs-packages/viper/viper-cmd.el
Index: viper-cmd.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/viper-cmd.el,v
retrieving revision 1.42
retrieving revision 1.43
diff -u -p -r1.42 -r1.43
--- viper-cmd.el 2008/01/09 06:27:30 1.42
+++ viper-cmd.el 2008/01/10 07:01:31 1.43
@@ -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
(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.
1.98 +4 -0 XEmacs/packages/xemacs-packages/viper/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/viper/ChangeLog,v
retrieving revision 1.97
retrieving revision 1.98
diff -u -p -r1.97 -r1.98
--- ChangeLog 2008/01/09 10:01:57 1.97
+++ ChangeLog 2008/01/10 07:01:31 1.98
@@ -1,3 +1,7 @@
+2008-01-10 Michael Kifer <kifer at cs.stonybrook.edu>
+
+ * viper*.el: uncommented declare-function.
+
2008-01-09 Norbert Koch <viteno at xemacs.org>
* Makefile (VERSION): XEmacs package 1.60 released.
More information about the XEmacs-CVS
mailing list