60 lines
2.4 KiB
EmacsLisp
60 lines
2.4 KiB
EmacsLisp
;;; funcs.el --- Python Layer functions File for Spacemacs
|
|
;;
|
|
;; Copyright (c) 2012-2016 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;;; License: GPLv3
|
|
|
|
;; from http://pedrokroger.net/2010/07/configuring-emacs-as-a-python-ide-2/
|
|
(defun annotate-pdb ()
|
|
"Highlight break point lines."
|
|
(interactive)
|
|
(highlight-lines-matching-regexp "import i?pu?db")
|
|
(highlight-lines-matching-regexp "i?pu?db.set_trace()"))
|
|
|
|
(defun python-toggle-breakpoint ()
|
|
"Add a break point, highlight it."
|
|
(interactive)
|
|
(let ((trace (cond ((executable-find "ipdb") "import ipdb; ipdb.set_trace()")
|
|
((executable-find "pudb") "import pudb; pudb.set_trace()")
|
|
(t "import pdb; pdb.set_trace()")))
|
|
(line (thing-at-point 'line)))
|
|
(if (and line (string-match trace line))
|
|
(kill-whole-line)
|
|
(progn
|
|
(back-to-indentation)
|
|
(insert-string trace)
|
|
(insert-string "\n")
|
|
(python-indent-line)))))
|
|
|
|
;; from https://www.snip2code.com/Snippet/127022/Emacs-auto-remove-unused-import-statemen
|
|
(defun python-remove-unused-imports()
|
|
"Use Autoflake to remove unused function"
|
|
"autoflake --remove-all-unused-imports -i unused_imports.py"
|
|
(interactive)
|
|
(if (executable-find "autoflake")
|
|
(progn
|
|
(shell-command (format "autoflake --remove-all-unused-imports -i %s"
|
|
(shell-quote-argument (buffer-file-name))))
|
|
(revert-buffer t t t))
|
|
(message "Error: Cannot find autoflake executable.")))
|
|
|
|
(defun pyenv-mode-set-local-version ()
|
|
"Set pyenv version from \".python-version\" by looking in parent directories."
|
|
(interactive)
|
|
(let ((root-path (locate-dominating-file default-directory
|
|
".python-version")))
|
|
(when root-path
|
|
(let* ((file-path (expand-file-name ".python-version" root-path))
|
|
(version (with-temp-buffer
|
|
(insert-file-contents-literally file-path)
|
|
(buffer-substring-no-properties (line-beginning-position)
|
|
(line-end-position)))))
|
|
(if (member version (pyenv-mode-versions))
|
|
(pyenv-mode-set version)
|
|
(message "pyenv: version `%s' is not installed (set by %s)"
|
|
version file-path))))))
|