unhighlight-regexp displays awful things.

unhighlight-regexp displays awful things.

[Michaël Cadilhac]

[-- Attachment #1.1.1: Type: text/plain, Size: 498 bytes --]

Hi guys !

Well, I don't know if the following is on purpose, but it is very
strange : highlight something with highlight-regexp, then try
unhighlighting it with M-x unhighlight-regexp, and you'll end-up with no
less than a POPUP MENU !

Gosh...  So many years of fighting popups in our web browsers, and here
they are, in the middle of the almighty Emacs.  Curse you damned popping
stuff !

It may be due, however, to a change in (this-command-keys)...

What about the following :


[-- Attachment #1.1.2: hi-lock.patch --]
[-- Type: text/x-patch, Size: 1398 bytes --]

Index: hi-lock.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/hi-lock.el,v
retrieving revision 1.46
diff -B -w -c -r1.46 hi-lock.el
*** hi-lock.el	26 Jul 2007 05:26:25 -0000	1.46
--- hi-lock.el	20 Aug 2007 16:58:03 -0000
***************
*** 462,468 ****
  \\<minibuffer-local-must-match-map>Use \\[minibuffer-complete] to complete a partially typed regexp.
  \(See info node `Minibuffer History'.\)"
    (interactive
!    (if (and (display-popup-menus-p) (vectorp (this-command-keys)))
         (catch 'snafu
  	 (or
  	  (x-popup-menu
--- 462,468 ----
  \\<minibuffer-local-must-match-map>Use \\[minibuffer-complete] to complete a partially typed regexp.
  \(See info node `Minibuffer History'.\)"
    (interactive
!    (if (and (display-popup-menus-p) (not last-nonmenu-event))
         (catch 'snafu
  	 (or
  	  (x-popup-menu
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.11583
diff -C 0 -r1.11583 ChangeLog
*** ChangeLog	20 Aug 2007 15:53:07 -0000	1.11583
--- ChangeLog	20 Aug 2007 16:58:08 -0000
***************
*** 0 ****
--- 1,5 ----
+ 2007-08-20  Michaël Cadilhac  <michael@cadilhac.name>
+ 
+ 	* hi-lock.el (hi-lock-unface-buffer): Show a x-menu only if the
+ 	mouse was used.
+ 

[-- Attachment #1.1.3: Type: text/plain, Size: 335 bytes --]


TIA!

-- 
 |   Michaël `Micha' Cadilhac       |    The second-degree,                  |
 |   http://michael.cadilhac.name   |       is kind of                       |
 |   JID/MSN:                       |   the semantic back slang.             |
 `----  michael.cadilhac@gmail.com  |                                   -  --'

[-- Attachment #1.2: Type: application/pgp-signature, Size: 188 bytes --]

[-- Attachment #2: Type: text/plain, Size: 142 bytes --]

_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

Re: unhighlight-regexp displays awful things.

[Richard Stallman]

If the change fixes the bug, please install it.