Getting the TAB key for filename completion

Getting the TAB key for filename completion

[Davin Pearson]

I have installed hippie-expand inside my Emacs.  Specifically I have

installed the following command:



(fset 'my-complete-file (make-hippie-expand-function

                         '(try-complete-file-name-partially

                           try-complete-file-name)))



My trouble is that I cannot bind this command to the TAB key when you

enter the command M-x compile RET.  Could someone please advise me how

to get file name completion with the TAB key online?

Re: Getting the TAB key for filename completion

[Kevin Rodgers]

Davin Pearson wrote:
> I have installed hippie-expand inside my Emacs.  Specifically I have
> installed the following command:
> 
> (fset 'my-complete-file (make-hippie-expand-function
>                          '(try-complete-file-name-partially
>                            try-complete-file-name)))
> 
> 
> 
> My trouble is that I cannot bind this command to the TAB key when you
> enter the command M-x compile RET.  Could someone please advise me how
> to get file name completion with the TAB key online?

`M-x compile' reads its COMMAND argument by calling read-from-minibuffer
with a nil KEYMAP argument, which defaults to minibuffer-local-map:

(define-key minibuffer-local-map "\t" 'my-complete-file); or (kbd "TAB")

The tricky part would be trying to restrict that binding to `M-x compile'.
I think it'd be easier to define a new command:

(defun my-compile ()
   "Run `\\[compile]' with TAB temporarily bound to `my-complete-file'."
   (interactive)
   (let ((tab-command (lookup-key minibuffer-local-map "\t")))
     (define-key minibuffer-local-map "\t" 'my-complete-file)
     (unwind-protect
	(call-interactively 'compile)
       (define-key minibuffer-local-map "\t" tab-command))))

-- 
Kevin Rodgers
Denver, Colorado, USA

Re: Getting the TAB key for filename completion

[Davin Pearson]

On Aug 20, 5:21 pm, Kevin Rodgers <kevin.d.rodg...@gmail.com> wrote:
> (define-key minibuffer-local-map "\t" 'my-complete-file); or (kbd "TAB")

Thanks, this works fine for me.

Another question I have is this.  Why doesn't the following command
redefine Control-Q to quit?

(global-set-key "\C-q" 'keyboard-quit)

Is this a bug in Emacs?  My suspicion is that is the case.

Re: Getting the TAB key for filename completion

[Peter Dyballa]

Am 20.08.2008 um 10:24 schrieb Davin Pearson:

> Another question I have is this.  Why doesn't the following command
> redefine Control-Q to quit?
>
> (global-set-key "\C-q" 'keyboard-quit)


Because it's a prefix key, like for example Esc?

--
Greetings

   Pete

The future will be much better tomorrow.
				– George W. Bush

Re: Getting the TAB key for filename completion

[Nikolaj Schumacher]

Peter Dyballa <Peter_Dyballa@Web.DE> wrote:

> Am 20.08.2008 um 10:24 schrieb Davin Pearson:
>
>> Another question I have is this.  Why doesn't the following command
>> redefine Control-Q to quit?
>>
>> (global-set-key "\C-q" 'keyboard-quit)
>
> Because it's a prefix key, like for example Esc?

It's not a prefix key.
And redefining it works for me.  Are you sure `keyboard-quit' is the
command you mean?


regards,
Nikolaj Schumacher

Re: Getting the TAB key for filename completion

[Davin Pearson]

2008/8/20 Nikolaj Schumacher <me@nschum.de>:
> And redefining it works for me.  Are you sure `keyboard-quit' is the
> command you mean?

Evaluate the following code:

(global-set-key "\C-q" 'keyboard-quit)

Then do a C-x C-e on the following form:

(while t)

You will see that the only way to break out of the infinite loop is to
press C-g.  Note that C-q doesn't work in spite of the above binding
of C-q.  I assume that the reason C-q doesn't work is because of a
design oversight of the creators of Emacs.


-- 
Sincerely and kindest regards, Davin.
Davin Pearson http://www.davinpearson.com

Re: Getting the TAB key for filename completion

[Andreas Politz]

Davin Pearson wrote:
> 2008/8/20 Nikolaj Schumacher <me@nschum.de>:
>> And redefining it works for me.  Are you sure `keyboard-quit' is the
>> command you mean?
> 
> Evaluate the following code:
> 
> (global-set-key "\C-q" 'keyboard-quit)
> 
> Then do a C-x C-e on the following form:
> 
> (while t)
> 
> You will see that the only way to break out of the infinite loop is to
> press C-g.  Note that C-q doesn't work in spite of the above binding
> of C-q.  I assume that the reason C-q doesn't work is because of a
> design oversight of the creators of Emacs.
> 
> 

(set-input-mode x y z ?\C-q)


-ap