Mercurial > dotfiles

comparison .elisp/settings/50.localfuncs.el @ 188:e77c01b7b0f4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
localfuncs: add tool for running check-code on hg
author Augie Fackler <durin42@gmail.com>
date Wed, 24 Feb 2010 14:34:21 -0600
parents cd4e645d1207
children c965d5dbd868
comparison
equal deleted inserted replaced
187:68304b1d2878 188:e77c01b7b0f4
37 (file-name-directory buffer-file-name) 37 (file-name-directory buffer-file-name)
38 "; pyflakes " (file-name-nondirectory 38 "; pyflakes " (file-name-nondirectory
39 buffer-file-name)) 39 buffer-file-name))
40 nil 40 nil
41 (lambda (mode) "*pyflakes*"))) 41 (lambda (mode) "*pyflakes*")))
42
43 (defun hg-check-code ()
44 (interactive)
45 (textmate-start-compile-in-root "python contrib/check-code.py `hg man`"
46 nil
47 '(lambda (x) "*check-code*") ))
42 48
43 (defun fullscreen () 49 (defun fullscreen ()
44 (interactive) 50 (interactive)
45 (set-frame-parameter nil 'fullscreen 51 (set-frame-parameter nil 'fullscreen
46 (if (frame-parameter nil 'fullscreen) nil 'fullboth))) 52 (if (frame-parameter nil 'fullscreen) nil 'fullboth)))