15 lines
411 B
EmacsLisp
15 lines
411 B
EmacsLisp
;;; defuns-python.el
|
|
|
|
;;;###autoload
|
|
(defun narf*anaconda-mode-doc-buffer ()
|
|
"Delete the window on escape or C-g."
|
|
(with-current-buffer (get-buffer "*anaconda-doc*")
|
|
(local-set-key [escape] 'anaconda-nav-quit)
|
|
(local-set-key [?\C-g] 'anaconda-nav-quit)))
|
|
|
|
;;;###autoload
|
|
(defun narf/inf-python ()
|
|
(run-python python-shell-interpreter t t))
|
|
|
|
(provide 'defuns-python)
|
|
;;; defuns-python.el ends here
|