;;; init.el --- init.el  -*- lexical-binding: t -*-

;;; Commentary:

;;; Code:

;; hs-minor-mode
(add-hook 'prog-mode-hook 'hs-minor-mode)

;; flycheck
(use-package flycheck)

(use-package flycheck-guile
  :hook
  (scheme-mode . (lambda ()
                   (require 'flycheck-guile))))

;; consult-flycheck
(use-package consult-flycheck)

;; tree-sitter
(use-package treesit-auto
  :config
  (setq treesit-auto-install 'prompt)
  (global-treesit-auto-mode)
  (setq treesit-font-lock-level 4))

;; scheme
(use-package geiser
  :config
  (with-eval-after-load 'geiser
    (setq geiser-default-implementation 'guile)))

(use-package geiser-guile)

;; markdown
(use-package markdown-mode
  :bind
  (:map markdown-mode-map
        ("C-c C-e" . markdown-do))
  :hook
  (markdown-mode . toggle-truncate-lines)
  :init
  (setq markdown-command "multimarkdown")
  (when (>= emacs-major-version 31)
    (add-to-list 'major-mode-remap-alist
		 '(markdown-mode . markdown-ts-mode))
    (add-hook 'markdown-ts-mode-hook #'toggle-truncate-lines)))

(provide 'init-prog)

;;; init-prog.el ends here