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