Browse Source

Use advice for my-isortify

master
10sr 4 years ago
parent
commit
04a1fd8555
Signed by: 10sr GPG Key ID: C384BB17CBB19347
1 changed files with 9 additions and 7 deletions
  1. +9
    -7
      emacs.el

+ 9
- 7
emacs.el View File

@@ -1414,19 +1414,21 @@ found, otherwise returns nil."
(when (require 'with-venv nil t) (when (require 'with-venv nil t)
(with-venv-advice-add 'blacken-buffer))) (with-venv-advice-add 'blacken-buffer)))


;; isortify-buffer breaks buffer when it contains japanese text
;; `isortify-buffer' breaks buffer when it contains japanese text
(defun my-isortify () (defun my-isortify ()
(interactive) (interactive)
(cl-assert buffer-file-name) (cl-assert buffer-file-name)
(cl-assert (not (buffer-modified-p))) (cl-assert (not (buffer-modified-p)))
(with-venv
(call-process "python" ;; PROGRAM
nil ;; INFILE
nil ;; DESTINATION
nil ;; DISPLAY
"-m" "isort" buffer-file-name))
(call-process "python" ;; PROGRAM
nil ;; INFILE
nil ;; DESTINATION
nil ;; DISPLAY
"-m" "isort" buffer-file-name)
(message "isortify done") (message "isortify done")
(revert-buffer nil t)) (revert-buffer nil t))
(when (fboundp 'with-venv-advice-add)
;; TODO: Lazy load with-venv
(with-venv-advice-add 'my-isortify))


;; https://github.com/lunaryorn/old-emacs-configuration/blob/master/lisp/flycheck-virtualenv.el ;; https://github.com/lunaryorn/old-emacs-configuration/blob/master/lisp/flycheck-virtualenv.el
(defun my-set-venv-flycheck-executable-find () (defun my-set-venv-flycheck-executable-find ()


Loading…
Cancel
Save