# HG changeset patch
# User Augie Fackler <durin42@gmail.com>
# Date 1246472156 18000
# Node ID 67bfc48b2a618fcf5794516742ba1a4a9f0f0ffc
# Parent  85d912e123afef2e05e5b31a69dc95896bf41a99
Function for removing a file from Mercurial.

diff --git a/.elisp/settings/50.localfuncs.el b/.elisp/settings/50.localfuncs.el
--- a/.elisp/settings/50.localfuncs.el
+++ b/.elisp/settings/50.localfuncs.el
@@ -55,3 +55,8 @@ Symbols matching the text at point are p
   (interactive)
   (set-frame-parameter nil 'fullscreen
                        (if (frame-parameter nil 'fullscreen) nil 'fullboth)))
+
+
+(defun hg-rm-this-file ()
+  (interactive)
+  (shell-command-to-string (concat "hg rm " buffer-file-name)))