소스 검색

Fix black-check flycheck parser

master
10sr 5 년 전
부모
커밋
962d33ba68
로그인 계정: 10sr GPG 키 ID: 7BEC428194130EB2
1개의 변경된 파일25개의 추가작업 그리고 24개의 파일을 삭제
  1. +25
    -24
      emacs.el

+ 25
- 24
emacs.el 파일 보기

@@ -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."


불러오는 중...
취소
저장