# HG changeset patch # User Juanma Barranquero # Date 1128586750 0 # Node ID df5f6fcce1beb2c1c6c102276428c5106d8727e5 # Parent 74b084c8ec131f522e45d1d5d63a7a3f8f210935 (x-pointer-hand2, x-pointer-top-left-arrow): Add defvars. diff -r 74b084c8ec13 -r df5f6fcce1be lisp/dframe.el --- a/lisp/dframe.el Thu Oct 06 08:11:14 2005 +0000 +++ b/lisp/dframe.el Thu Oct 06 08:19:10 2005 +0000 @@ -109,6 +109,9 @@ ;; * The timer managers doesn't handle multiple different timeouts. ;; * You can't specify continuous timouts (as opposed to just lidle timers.) +(defvar x-pointer-hand2) +(defvar x-pointer-top-left-arrow) + ;;; Code: (defvar dframe-xemacsp (string-match "XEmacs" emacs-version) "Non-nil if we are running in the XEmacs environment.") @@ -151,7 +154,7 @@ (if (fboundp 'frame-parameter) (defalias 'dframe-frame-parameter 'frame-parameter) - + (defun dframe-frame-parameter (frame parameter) "Return FRAME's PARAMETER value." (cdr (assoc parameter (frame-parameters frame))))) @@ -716,7 +719,7 @@ (when (or (not (dframe-mouse-event-p last-input-event)) dframe-activity-change-focus-flag) (dframe-select-attached-frame) - ;; KB: For what is this - raising the frame?? + ;; KB: For what is this - raising the frame?? (other-frame 0))) @@ -903,7 +906,7 @@ (windowp (posn-window (event-end event))) ; Sometimes ; there is no window to jump into. )) - + (funcall dframe-track-mouse-function event))) (defun dframe-track-mouse-xemacs (event)