[Emacs-diffs] Changes to emacs/lisp/xt-mouse.el

[Nick Roberts]

Index: emacs/lisp/xt-mouse.el
diff -c emacs/lisp/xt-mouse.el:1.20 emacs/lisp/xt-mouse.el:1.21
*** emacs/lisp/xt-mouse.el:1.20 Mon Sep  1 15:45:18 2003
--- emacs/lisp/xt-mouse.el      Thu Dec  9 23:05:36 2004
***************
*** 139,150 ****
                                                  default-header-line-format)
                                              1
                                            0)))
!                   (move-to-column (+ (car where) (current-column)
                                       (if (string-match "\\` \\*Minibuf"
                                                         (buffer-name))
                                           (- (minibuffer-prompt-width))
                                         0)
!                                      (max 0 (1- (window-hscroll)))))
                    (point))
                where))
         (mouse (intern
--- 139,151 ----
                                                  default-header-line-format)
                                              1
                                            0)))
!                   (move-to-column (- (+ (car where) (current-column)
                                       (if (string-match "\\` \\*Minibuf"
                                                         (buffer-name))
                                           (- (minibuffer-prompt-width))
                                         0)
!                                      (max 0 (1- (window-hscroll))))
!                                      left-margin-width))
                    (point))
                where))
         (mouse (intern