mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
40 lines
1.6 KiB
EmacsLisp
40 lines
1.6 KiB
EmacsLisp
;;; lang/janet/config.el -*- lexical-binding: t; -*-
|
|
|
|
(use-package! janet-mode
|
|
;; HACK: Needed to override autoloaded `auto-mode-alist' and
|
|
;; `interpreter-mode-alist' entries from this or `janet-ts-mode', so we can
|
|
;; rely on `major-mode-remap-defaults' instead.
|
|
:mode "\\.\\(jdn\\|janet\\)\\'"
|
|
:interpreter "janet[0-9]*\\'"
|
|
:config
|
|
(after! dtrt-indent
|
|
(add-to-list 'dtrt-indent-hook-mapping-list '(janet-mode janet janet-indent)))
|
|
|
|
;; HACK: janet-mode calls `janet--set-indentation' each time it's activated,
|
|
;; making its (global) side-effects unnecessarily difficult to change, so I
|
|
;; disable it and call it manually (and once).
|
|
;; REVIEW: PR this upstream?
|
|
(defadvice! +janet--inhibit-indent-init-a (fn &rest args)
|
|
:around #'janet-mode
|
|
(letf! ((#'janet--set-indentation #'ignore))
|
|
(apply fn args)))
|
|
|
|
(janet--set-indentation)
|
|
(dolist (sym '(with label catseq eachp eachk))
|
|
(put sym 'janet-indent-function 'defun)))
|
|
|
|
|
|
;; (use-package! janet-ts-mode
|
|
;; :when (modulep! +tree-sitter)
|
|
;; :defer t
|
|
;; :init
|
|
;; (set-tree-sitter! 'janet-mode 'janet-ts-mode
|
|
;; `(janet-simple :url "https://github.com/sogaiu/tree-sitter-janet-simple"
|
|
;; :cc ,(if (featurep :system 'windows) "gcc.exe")))
|
|
;; :config
|
|
;; ;; HACK: These autoloads are inserted twice by this package, so remove them so
|
|
;; ;; this module can be the single source of truth.
|
|
;; (cl-callf2 delete '("\\.janet\\'" . janet-ts-mode) auto-mode-alist)
|
|
;; (cl-callf2 delete '("\\.jdn\\'" . janet-ts-mode) auto-mode-alist)
|
|
;; (cl-callf2 delete '("janet" . janet-ts-mode) interpreter-mode-alist))
|