🚀 go-pugleaf

In article <2074@seti.inria.fr> gs@ynetfrsp.inria.fr (gs@ynetfrsp.inria.fr) writes:
>Hi, 
>How can I insert , within a minibuffer command, the pathname of the file
>contained in the current buffer ?
>Any help appreciated, 
>Thanks !
>	

Well, something like the following seems to work:

 (defun minibuffer-ins-buffer-file-name ()
   "Insert the file name of the current buffer into the minibuffer."
   (interactive)
   ;; We assume that the second entry in the buffer list is the "real"
   ;; current buffer, since "(current-buffer)" just returns the
   ;; minibuffer we're in.   This is obviously wrong for recursive
   ;; minibuffer excursions.
   (insert (or (buffer-file-name (car (cdr (buffer-list))))
               (beep) "")))

 (define-key minibuffer-local-map "\C-c\C-f" 'ins-buffer-file-name)
 (define-key minibuffer-local-ns-map "\C-c\C-f" 'ins-buffer-file-name)
 (define-key minibuffer-local-must-match-map "\C-c\C-f" 'ins-buffer-file-name)
 (define-key minibuffer-local-completion-map "\C-c\C-f" 'ins-buffer-file-name)

Besides the caveat about identifying the "current" buffer, note that there
may be other keymaps used in the minibuffer; those updated above are only
the most frequently-used.

Hope this helps,

Pete
--
===============================================================================
Pete Halverson                        		    INET: halverson@crd.ge.com 
GE Corporate R&D Center	                      UUCP: uunet!crd.ge.com!halverson
Schenectady, NY