BarryWarsaw has his home page at http://barry.warsaw.us/
Some useful Emacs stuff for Python hacking
(require 'flymake)
;; Redefine this to shorten the mode-line real-estate.
(defun flymake-report-status (e-w &optional status)
"Show status in mode line."
(when e-w
(setq flymake-mode-line-e-w e-w))
(when status
(setq flymake-mode-line-status status))
(let* ((mode-line " FM")) ;BAW 2010-10-08
(when (> (length flymake-mode-line-e-w) 0)
(setq mode-line (concat mode-line ":" flymake-mode-line-e-w)))
(setq mode-line (concat mode-line flymake-mode-line-status))
(setq flymake-mode-line mode-line)
(force-mode-line-update)))
(defun baw-flymake-pyflakes-init ()
(let* ((temp-file (flymake-init-create-temp-buffer-copy
'flymake-create-temp-inplace))
(local-file (file-relative-name
temp-file
(file-name-directory buffer-file-name))))
(list "pyflakes" (list local-file))))
;; For now, only flymake on Python files.
(setq flymake-allowed-file-name-masks
'(("\\.py\\'" baw-flymake-pyflakes-init)))
(add-hook 'find-file-hook 'flymake-find-file-hook)
(global-set-key [(control c) (meta n)] 'flymake-goto-next-error)
(global-set-key [(control c) (meta p)] 'flymake-goto-prev-error)
(global-set-key [(control c) (meta e)]
'flymake-display-err-menu-for-current-line)
(defun baw-python-mode-hook ()
(setq comment-column 50
fill-column 78)
(setq mode-name "Py")
(flyspell-prog-mode)
(define-key python-mode-map [(meta f)] 'py-forward-into-nomenclature)
(define-key python-mode-map [(meta b)] 'py-backward-into-nomenclature))
(add-hook 'python-mode-hook 'baw-python-mode-hook)