/[emacs]/emacs/lisp/dframe.el
ViewVC logotype

Diff of /emacs/lisp/dframe.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by cyd, Sun Oct 2 03:11:03 2005 UTC revision 1.4 by cyd, Tue Oct 4 14:06:44 2005 UTC
# Line 257  Local to those buffers, as a function ca Line 257  Local to those buffers, as a function ca
257          )          )
258    
259      ;; mouse bindings so we can manipulate the items on each line      ;; mouse bindings so we can manipulate the items on each line
260      (define-key map [down-mouse-1] 'dframe-double-click)      ;; (define-key map [down-mouse-1] 'dframe-double-click)
261        (define-key map [follow-link] 'mouse-face)
262      (define-key map [mouse-2] 'dframe-click)      (define-key map [mouse-2] 'dframe-click)
263      ;; This is the power click for new frames, or refreshing a cache      ;; This is the power click for new frames, or refreshing a cache
264      (define-key map [S-mouse-2] 'dframe-power-click)      (define-key map [S-mouse-2] 'dframe-power-click)
# Line 921  BUFFER and POSITION are optional because Line 922  BUFFER and POSITION are optional because
922               dframe-help-echo-function)               dframe-help-echo-function)
923      (let ((dframe-suppress-message-flag t))      (let ((dframe-suppress-message-flag t))
924        (with-current-buffer buffer        (with-current-buffer buffer
925          (if position (goto-char position))          (save-excursion
926          (funcall dframe-help-echo-function)))))            (if position (goto-char position))
927              (funcall dframe-help-echo-function))))))
928    
929  (defun dframe-mouse-set-point (e)  (defun dframe-mouse-set-point (e)
930    "Set POINT based on event E.    "Set POINT based on event E.

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26