Mercurial > emacs
changeset 65866:df5f6fcce1be
(x-pointer-hand2, x-pointer-top-left-arrow): Add defvars.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Thu, 06 Oct 2005 08:19:10 +0000 |
| parents | 74b084c8ec13 |
| children | 035abbbac402 |
| files | lisp/dframe.el |
| diffstat | 1 files changed, 6 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- 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)