# HG changeset patch
# User Augie Fackler <durin42@gmail.com>
# Date 1267043661 21600
# Node ID e77c01b7b0f480fc12ffc28f2b27f508410dc6c1
# Parent  68304b1d287853064bbed6261ba320520624e2de
localfuncs: add tool for running check-code on hg

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
@@ -40,6 +40,12 @@ spends an eternity in a regex if you mak
                      nil
                      (lambda (mode) "*pyflakes*")))
 
+(defun hg-check-code ()
+  (interactive)
+  (textmate-start-compile-in-root "python contrib/check-code.py `hg man`"
+                                  nil
+                                  '(lambda (x) "*check-code*") ))
+
 (defun fullscreen ()
   (interactive)
   (set-frame-parameter nil 'fullscreen