This repository has been archived on 2024-10-22. You can view files and clone it, but cannot push or open issues or pull requests.
spacemacs/layers/+checkers/syntax-checking/funcs.el

35 lines
1.2 KiB
EmacsLisp
Raw Normal View History

;;; funcs.el --- Syntax Checking Layer functions File for Spacemacs
;;
2018-01-04 07:00:25 +00:00
;; Copyright (c) 2012-2018 Sylvain Benner & Contributors
;;
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
;; URL: https://github.com/syl20bnr/spacemacs
;;
;; This file is not part of GNU Emacs.
;;
;;; License: GPLv3
(defun spacemacs/enable-flycheck (mode)
2016-01-27 20:08:25 +00:00
"Use flycheck in MODE by default, if `syntax-checking-enable-by-default' is
true."
(when (and syntax-checking-enable-by-default
2016-02-01 04:16:50 +00:00
(listp flycheck-global-modes)
(not (eq 'not (car flycheck-global-modes))))
(add-to-list 'flycheck-global-modes mode)))
;; toggle flycheck window
(defun spacemacs/toggle-flycheck-error-list ()
"Toggle flycheck's error list window.
If the error list is visible, hide it. Otherwise, show it."
(interactive)
(-if-let (window (flycheck-get-error-list-window))
(quit-window nil window)
(flycheck-list-errors)))
(defun spacemacs/goto-flycheck-error-list ()
"Open and go to the error list buffer."
(interactive)
(unless (get-buffer-window (get-buffer flycheck-error-list-buffer))
(flycheck-list-errors)
(switch-to-buffer-other-window flycheck-error-list-buffer)))