Re: ruler-mode/key-bindings

[Nick Roberts]

Richard Stallman writes:
 > S-down-mouse-1 is bound to ruler-mode-mouse-set-left-margin.
 > S-mouse-1 is not defined, so the message is accurate.
 > 
 > Does this result in good behavior?

Yes.  Binding directly seems to works also.

-- 
Nick                                           http://www.inet.net.nz/~nickrob


*** ruler-mode.el       07 Feb 2006 03:33:35 +1300      1.26
--- ruler-mode.el       26 Oct 2006 08:55:54 +1300      
***************
*** 517,531 ****
        #'ignore)
      (define-key km [header-line down-mouse-2]
        #'ruler-mode-mouse-grab-any-column)
!     (define-key km [header-line (shift down-mouse-1)]
!       #'ruler-mode-mouse-set-left-margin)
!     (define-key km [header-line (shift down-mouse-3)]
        #'ruler-mode-mouse-set-right-margin)
!     (define-key km [header-line (control down-mouse-1)]
        #'ruler-mode-mouse-add-tab-stop)
!     (define-key km [header-line (control down-mouse-3)]
        #'ruler-mode-mouse-del-tab-stop)
!     (define-key km [header-line (control down-mouse-2)]
        #'ruler-mode-toggle-show-tab-stops)
      km)
    "Keymap for ruler minor mode.")
--- 517,531 ----
        #'ignore)
      (define-key km [header-line down-mouse-2]
        #'ruler-mode-mouse-grab-any-column)
!     (define-key km [header-line (shift mouse-1)]
!       'ruler-mode-mouse-set-left-margin)
!     (define-key km [header-line (shift mouse-3)]
        #'ruler-mode-mouse-set-right-margin)
!     (define-key km [header-line (control mouse-1)]
        #'ruler-mode-mouse-add-tab-stop)
!     (define-key km [header-line (control mouse-3)]
        #'ruler-mode-mouse-del-tab-stop)
!     (define-key km [header-line (control mouse-2)]
        #'ruler-mode-toggle-show-tab-stops)
      km)
    "Keymap for ruler minor mode.")