Re: emacs equivalent of vi %

[Scott Frazer]

Rustom Mody wrote:
> In vi one can do, for example,
> :!gcc %
> and the current file gets compiled -- ingeneral :
> :!someCommand options % otherStuff
> and the filename gets interpolated.
> Is there any way to get the '%' behavior in emacs?
> [Note: I know about compile; I am asking a more general question about
> getting the filename]

How about this:

(defun shell-command-on-current-file (command &optional output-buffer 
error-buffer)
  (interactive (list (read-from-minibuffer "Shell command: "
                                           nil nil nil 'shell-command-history)
                     current-prefix-arg
                     shell-command-default-error-buffer))
  (unless (buffer-file-name)
    (error "No file associated with this buffer"))
  (setq command (replace-regexp-in-string "%" (buffer-file-name) command nil t))
  (shell-command command output-buffer error-buffer))


Scott