Re: Passing current buffer to compile command

[duke]

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 :)