diff --git a/lisp/fg42/deps.el b/lisp/fg42/deps.el index 0bc5647..ac74824 100644 --- a/lisp/fg42/deps.el +++ b/lisp/fg42/deps.el @@ -90,6 +90,8 @@ org-ql ctrlf badwolf-theme + clojure-mode + clojure-ts-mode ace-window avy paredit diff --git a/lisp/fg42/editor.el b/lisp/fg42/editor.el index 8c31207..d425ed2 100644 --- a/lisp/fg42/editor.el +++ b/lisp/fg42/editor.el @@ -31,6 +31,7 @@ (require 'fg42/langs/python) (require 'fg42/langs/elisp) (require 'fg42/langs/nix) + (require 'fg42/langs/clojure) (require 'fg42/git) (require 'fg42/wm) diff --git a/lisp/fg42/langs/clojure.el b/lisp/fg42/langs/clojure.el new file mode 100644 index 0000000..583c2e6 --- /dev/null +++ b/lisp/fg42/langs/clojure.el @@ -0,0 +1,48 @@ +;;; FG42 --- The mighty editor for the emacsians -*- lexical-binding: t; -*- +;; +;; Copyright (c) 2010-2024 Sameer Rahmani & Contributors +;; +;; Author: Sameer Rahmani +;; URL: https://devheroes.codes/FG42/FG42 +;; Version: 4.0.0 +;; +;; This program is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. +;; +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. +;; +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . +;; +;;; Commentary: +;;; Code: +(eval-when-compile + (require 'fpkg)) + +(defun fg42/clojure-ts-mode-setup () + "A hook handler to setup cpp related configurations." + (setq-local company-backends + '((company-capf :with company-yasnippet) :separate + (company-keywords company-dabbrev company-ispell) :separate + company-files)) + ;; We set eglot's autoload command to `eglot-ensure' + (eglot-ensure)) + +(use! clojure-mode + "Clojure mode" + :init + (add-to-list 'major-mode-remap-alist '(clojure-mode . clojure-ts-mode)) + :mode ("\\.cljs\\'" . clojure-ts-mode) + :hook + (clojure-ts-mode . company-mode) + (clojure-ts-mode . company-box) + (clojure-ts-mode . flycheck-clj-kondo) + (clojure-ts-mode . clojure-ts-mode-setup) + (clojure-ts-mode . lsp)) + +(provide 'fg42/langs/clojure)