diff lisp/mouse.el @ 778:2923009caf47

[xemacs-hg @ 2002-03-16 10:38:59 by ben] cm.c, file-coding.c: fix warnings. .cvsignore: Those pesky *.tmp files. mule\arabic.el, mule\canna-leim.el, mule\china-util.el, mule\chinese.el, mule\cyril-util.el, mule\cyrillic.el, mule\devan-util.el, mule\devanagari.el, mule\english.el, mule\ethio-util.el, mule\ethiopic.el, mule\european.el, mule\greek.el, mule\hebrew.el, mule\indian.el, mule\japan-util.el, mule\japanese.el, mule\korea-util.el, mule\korean.el, mule\lao-util.el, mule\lao.el, mule\misc-lang.el, mule\mule-charset.el, mule\mule-cmds.el, mule\thai-util.el, mule\thai.el, mule\tibet-util.el, mule\tibetan.el, mule\viet-util.el, mule\vietnamese.el, unicode.el: Fix lots of warnings. Sync up some files to FSF 21.1. Copy over all charset definitions from FSF 21.1, convert them to our format, and stick them in the relevant files. Eventually we will actually be able to dump these files (though they may not quite work). autoload.el: Support defun*, defmacro*. mule/mule-composite.el, mule/mule-composite-stub.el: New file, stubs for nonexistent composition funs/vars. mule/viet-chars.el, dumped-lisp.el: Account for these changes. font.el, mouse.el, msw-font-menu.el, printer.el, startup.el: fix warnings.
author ben
date Sat, 16 Mar 2002 10:39:19 +0000
parents 79940b592197
children e38acbeb1cae
line wrap: on
line diff
--- a/lisp/mouse.el	Fri Mar 15 11:00:56 2002 +0000
+++ b/lisp/mouse.el	Sat Mar 16 10:39:19 2002 +0000
@@ -222,16 +222,18 @@
   ;; #### barely implemented.
   (when (click-inside-selection-p event)
     (cond ((featurep 'offix)
-	   (offix-start-drag-region
-	    event
-	    (extent-start-position zmacs-region-extent)
-	    (extent-end-position zmacs-region-extent))
+	   (declare-fboundp
+	    (offix-start-drag-region
+	     event
+	     (extent-start-position zmacs-region-extent)
+	     (extent-end-position zmacs-region-extent)))
 	   t)
 	  ((featurep 'cde)
 	   ;; should also work with CDE
-	   (cde-start-drag-region event
-				  (extent-start-position zmacs-region-extent)
-				  (extent-end-position zmacs-region-extent))
+	   (declare-fboundp
+	    (cde-start-drag-region event
+				   (extent-start-position zmacs-region-extent)
+				   (extent-end-position zmacs-region-extent)))
 	   t))))
 
 (defun mouse-eval-sexp (click force-window)