[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

C-h k does not catch text properies keymaps

From: Lennart Borgman (gmail)
Subject: C-h k does not catch text properies keymaps
Date: Thu, 22 Feb 2007 15:28:14 +0100
User-agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv: Gecko/20061207 Thunderbird/ Mnenhy/

Using C-h k to check mouse bindings does not work for text property keymaps.

To show this do

   emacs -Q

then paste the following code in the *Scratch* buffer and eval it:

(defun temp-test-mouse-ctrl-h-k()
  (switch-to-buffer-other-window (get-buffer-create "test mouse buffer"))
  (goto-char (point-max))
  (let ((map (make-sparse-keymap))
        (txt "click here"))
    (define-key map [mouse-1] '(lambda()
                                 "This is the lambda for mouse-1"
                                 (message "lambda for mouse-1 here")))
    (define-key map [f2] '(lambda()
                            "This is the lambda for f2"
                            (message "lambda for f2 here")))
(put-text-property 0 (length txt) 'face '(:underline t :foreground "red") txt)
    (put-text-property 0 (length txt) 'mouse-face 'highlight txt)
    (put-text-property 0 (length txt) 'keymap map txt)
    (insert "\n" txt)


   M-x temp-test-mouse-ctrl-h-k
   C-h k

and then click the red underlined text with mouse button 1. It will say

  <down-mouse-1> at that spot runs the command mouse-drag-region

which is not correct.

In GNU Emacs (i386-mingw-nt5.1.2600)
 of 2007-02-19

reply via email to

[Prev in Thread] Current Thread [Next in Thread]