global-set-key + query-replace-regexp

global-set-key + query-replace-regexp

[luca.spinacci]

I would like a short key to invoke query-replace-regexp command.
I tried
(global-set-key [f1] 'my-query-replace-regexp)
(fset 'my-query-replace-regexp [?\C-\M-%])
but the key "f1" invoke (M-x query-replace-regexp "" "" nil nil)

...Is there a way to call query-... interactively  via a short
key (M-x query-replace-regexp excepted!)?

Thank you,
Luca.

Re: global-set-key + query-replace-regexp

[Neon Absentius]

On Thu, Oct 27, 2005 at 04:55:21PM +0200, luca.spinacci@selex-comms.com wrote:
> 
> 
> I would like a short key to invoke query-replace-regexp command.
> I tried
> (global-set-key [f1] 'my-query-replace-regexp)
> (fset 'my-query-replace-regexp [?\C-\M-%])
> but the key "f1" invoke (M-x query-replace-regexp "" "" nil nil)
> 

Try

(global-set-key (kbd "<f1>") 'name-of-command)

HTH
-- 
 There is no national science just as there is no national
multiplication table; what is national is no longer science.
         -- Anton Checov

Re: global-set-key + query-replace-regexp

[Peter Dyballa]

Am 27.10.2005 um 16:55 schrieb luca.spinacci@selex-comms.com:

> I would like a short key to invoke query-replace-regexp command.
>

How about these simple ones:

	(global-set-key [M-f1]          'replace-string)
	(global-set-key [M-f2]          'replace-regexp)
	(global-set-key [M-f3]          'grep-find)
	(global-set-key [M-f4]          'query-replace-regexp)
	(global-set-key [f1 f2]         'manual-entry)
	(global-set-key [f1 f3]         'info-apropos)
	(global-set-key [f1 f4]         'apropos)
	(global-set-key [f1 f5]         'apropos-variable)
	(global-set-key [f3]            'compare-windows)

--
Greetings

   Pete

"What do you think of Western Civilization?"
  "I think it would be a good idea!"
     - Mohandas Karamchand Gandhi

Re: global-set-key + query-replace-regexp

[B. T. Raven]

<luca.spinacci@selex-comms.com> wrote in message
news:mailman.12914.1130425477.20277.help-gnu-emacs@gnu.org...
>
>
> I would like a short key to invoke query-replace-regexp command.
> I tried
> (global-set-key [f1] 'my-query-replace-regexp)
> (fset 'my-query-replace-regexp [?\C-\M-%])
> but the key "f1" invoke (M-x query-replace-regexp "" "" nil nil)
>
> ...Is there a way to call query-... interactively  via a short
> key (M-x query-replace-regexp excepted!)?
>
> Thank you,
> Luca.
>
>
>

I have found that keeping fingers close to the home keys is more
conducive to efficiency than almost anything else. Since you quickly get
used to the M-x keychord (Alt-x on my Dozer), it's easier to add keys to
that sequence via an alias in your .emacs:

(defalias 'qrr 'query-replace-regexp)  [This enables M-xqrr]

I would save the F-1 to F-12 keys for things that are done less often.

Ed