Sfoglia il codice sorgente

Fix black-check flycheck parser

master
10sr 5 anni fa
parent
commit
962d33ba68
Firmato da: 10sr ID Chiave GPG: 7BEC428194130EB2
1 ha cambiato i file con 25 aggiunte e 24 eliminazioni
  1. +25
    -24
      emacs.el

+ 25
- 24
emacs.el Vedi File

@@ -2064,30 +2064,31 @@ initializing."

(defun flycheck-parse-black-check (output checker buffer)
"Flycheck parser to check if reformat is required."
(with-temp-buffer
(insert output)
(save-match-data
(goto-char (point-min))
(when (re-search-forward "^would reformat .*$" nil t)
(list (flycheck-error-new-at
(point-min)
nil
'error
;;(format "Black: %s" (match-string 0))
"Black: would be reformatted"
:buffer buffer
:checker checker)))
(goto-char (point-min))
(when (re-search-forward "^error: cannot format .*$" nil t)
(list (flycheck-error-new-at
(point-min)
nil
'error
;; Fix not to include absolute file path
(format "Black: %s" (match-string 0))
:buffer buffer
:checker checker)))
)))
(let ((result nil))
(with-temp-buffer
(insert output)
(save-match-data
(goto-char (point-min))
(when (re-search-forward "^would reformat .*$" nil t)
(setq result (list (flycheck-error-new-at
(point-min)
nil
'error
;;(format "Black: %s" (match-string 0))
"Black: would be reformatted"
:buffer buffer
:checker checker))))
(goto-char (point-min))
(when (re-search-forward "^error: cannot format .*$" nil t)
(setq reslt (list (flycheck-error-new-at
(point-min)
nil
'error
;; Fix not to include absolute file path
(format "Black: %s" (match-string 0))
:buffer buffer
:checker checker))))))
result))

(defun my-flycheck-parse-unified-diff (output checker buffer)
"Flycheck parser to parse diff output."


Caricamento…
Annulla
Salva