Mercurial > dotfiles
comparison .elisp/settings/50.localfuncs.el @ 124:2ae20e96f6c0
Should really shell quote this arg.
author | Augie Fackler <durin42@gmail.com> |
---|---|
date | Tue, 07 Jul 2009 14:18:16 -0500 |
parents | 67bfc48b2a61 |
children | 15bcc3e0afeb |
comparison
equal
deleted
inserted
replaced
123:b2a07050b430 | 124:2ae20e96f6c0 |
---|---|
57 (if (frame-parameter nil 'fullscreen) nil 'fullboth))) | 57 (if (frame-parameter nil 'fullscreen) nil 'fullboth))) |
58 | 58 |
59 | 59 |
60 (defun hg-rm-this-file () | 60 (defun hg-rm-this-file () |
61 (interactive) | 61 (interactive) |
62 (shell-command-to-string (concat "hg rm " buffer-file-name))) | 62 (shell-command-to-string (concat "hg rm " (shell-quote-argument buffer-file-name)))) |