Re: ruler-mode/key-bindings

2006-10-25 Thread 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.")


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


Re: ruler-mode/key-bindings

2006-10-25 Thread Richard Stallman
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?

*** ruler-mode.el   07 Feb 2006 18:16:15 -0500  1.26
--- ruler-mode.el   25 Oct 2006 09:34:38 -0400  
***
*** 527,532 
--- 527,542 
#'ruler-mode-mouse-del-tab-stop)
  (define-key km [header-line (control down-mouse-2)]
#'ruler-mode-toggle-show-tab-stops)
+ (define-key km [header-line (shift mouse-1)]
+   'ignore)
+ (define-key km [header-line (shift mouse-3)]
+   'ignore)
+ (define-key km [header-line (control mouse-1)]
+   'ignore)
+ (define-key km [header-line (control mouse-3)]
+   'ignore)
+ (define-key km [header-line (control mouse-2)]
+   'ignore)
  km)
"Keymap for ruler minor mode.")
  


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


Re: ruler-mode/key-bindings

2006-10-23 Thread Nick Roberts
Richard Stallman writes:
 > Ruler-mode, Emacs reports that mouse clicks in the header-line are
 > undefined e.g
 > 
 >   is undefined
 > 
 > even though it is bound to ruler-mode-mouse-set-left-margin and
 > performs that function.
 > 
 > Those words seem to say that the click both fails and works correctly.
 > I do not know how to reconcile those two apparently contradictory
 > statements.
 > 
 > Can you provide a precise test case?

1) Do M-x ruler-mode.
2) Click S-mouse-1 on the header line.

The left margin is set where the click occurred but the frame flashes and the
message above appears in the minibuffer.

I think this may due to a change in keyboard.c.  The message appears because
Emacs reaches this line (Vthis_command is nil):

  if (NILP (Vthis_command))
{
  /* nil means key is undefined.  */
  Lisp_Object keys = Fvector (i, keybuf);
  keys = Fkey_description (keys, Qnil);
  bitch_at_user ();
--->  message_with_string ("%s is undefined", keys, 0);
  current_kboard->defining_kbd_macro = Qnil;
  update_mode_lines = 1;
  current_kboard->Vprefix_arg = Qnil;
}


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


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


Re: ruler-mode/key-bindings

2006-10-23 Thread Richard Stallman
Ruler-mode, Emacs reports that mouse clicks in the header-line are
undefined e.g

  is undefined

even though it is bound to ruler-mode-mouse-set-left-margin and
performs that function.

Those words seem to say that the click both fails and works correctly.
I do not know how to reconcile those two apparently contradictory
statements.

Can you provide a precise test case?


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug


ruler-mode/key-bindings

2006-10-22 Thread Nick Roberts

Ruler-mode, Emacs reports that mouse clicks in the header-line are undefined
e.g

  is undefined

even though it is bound to ruler-mode-mouse-set-left-margin and performs that
function.

The commentary says:

;; ...  It works only on Emacs 21.

but presumably this is not true.

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


___
emacs-pretest-bug mailing list
emacs-pretest-bug@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug