40 lines
909 B
EmacsLisp
40 lines
909 B
EmacsLisp
;;; defuns-flycheck.el
|
|
;; for ../core-flycheck.el
|
|
|
|
;;;###autoload
|
|
(defun narf|flycheck-enable-maybe ()
|
|
(unless (or (bound-and-true-p org-src-mode)
|
|
(eq major-mode 'org-mode))
|
|
(flycheck-mode +1)))
|
|
|
|
;;;###autoload
|
|
(defun narf*flycheck-buffer ()
|
|
(when (bound-and-true-p flycheck-mode)
|
|
(flycheck-buffer)))
|
|
|
|
;;;###autoload
|
|
(defun narf/flycheck-next-error ()
|
|
(interactive)
|
|
(call-interactively
|
|
(if (bound-and-true-p flycheck-mode)
|
|
'flycheck-next-error
|
|
'next-error)))
|
|
|
|
;;;###autoload
|
|
(defun narf/flycheck-previous-error ()
|
|
(interactive)
|
|
(call-interactively
|
|
(if (bound-and-true-p flycheck-mode)
|
|
'flycheck-previous-error
|
|
'previous-error)))
|
|
|
|
;;;###autoload
|
|
(defun narf/flycheck-errors ()
|
|
(interactive)
|
|
(when (bound-and-true-p flycheck-mode)
|
|
(flycheck-buffer)
|
|
(flycheck-list-errors)))
|
|
|
|
(provide 'defuns-flycheck)
|
|
;;; defuns-flycheck.el ends here
|