mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-29 14:33:34 -05:00
Write core initfiles + defuns
This commit is contained in:
30
core/lib/defuns-flycheck.el
Normal file
30
core/lib/defuns-flycheck.el
Normal file
@@ -0,0 +1,30 @@
|
||||
;;; defuns-flycheck.el
|
||||
;; for ../core-flycheck.el
|
||||
|
||||
;;;###autoload
|
||||
(defun narf*fly-shorter-status (result)
|
||||
(format "[%s]" (replace-regexp-in-string " FlyC:?" "" result)))
|
||||
|
||||
;;;###autoload
|
||||
(defun narf*flycheck-buffer ()
|
||||
(if (and (featurep 'flycheck) 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)))
|
||||
|
||||
(provide 'defuns-flycheck)
|
||||
;;; defuns-flycheck.el ends here
|
Reference in New Issue
Block a user