Re: Passing current buffer to compile command

[rusi]

On Jan 18, 12:07 am, duke <sidney.reilley...@gmail.com> wrote:
> On Jan 16, 8:49 pm, rusi <rustompm...@gmail.com> wrote:
>
>
>
> > On Jan 17, 8:29 am, rusi <rustompm...@gmail.com> wrote:
>
> > > The following will give that to you in the minibuffer
> > > [But beware of using it with buffers that have no file associated)
>
> > Now "No-file" should not misbehave
>
> > (savehist-mode 1)
> > (define-key minibuffer-local-map "%"
> >   (function
> >    (lambda ()
> >      (interactive)
> >      (let ((file-path-maybe (buffer-file-name
> >                              (window-buffer (minibuffer-selected-window)))))
> >      (insert (if file-path-maybe
> >                  (file-name-nondirectory file-path-maybe)
> >                "%"))))))
>
> You are too kind! Much obliged for the snippet, but especially the
> courtesy. Can't wait to hack my .emacs and try it out :)

I should attribute this to someone (who helped me write this) -- but
cant remember who :-)

More emacs-ish than vi-ish is to change the first line to
(define-key minibuffer-local-map (kbd "C-f")
;; analogous to C-x C-f

But then the last "%" is of course wrong and I dont know what to do
with it.
There should be a way of chaining back to the default binding of C-f
But (lookup-key minibuffer-local-map (kbd "C-f")) is giving nil --- So
dunno...