emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/clojure-ts-mode 662bc0d1ee 25/71: Add a command to display


From: ELPA Syncer
Subject: [nongnu] elpa/clojure-ts-mode 662bc0d1ee 25/71: Add a command to display the mode's version
Date: Fri, 25 Aug 2023 03:59:28 -0400 (EDT)

branch: elpa/clojure-ts-mode
commit 662bc0d1ee3465bb670098aa417efa9620500238
Author: Bozhidar Batsov <bozhidar@batsov.dev>
Commit: Bozhidar Batsov <bozhidar@batsov.dev>

    Add a command to display the mode's version
    
    Useful for bug reports.
---
 clojure-ts-mode.el | 16 +++++++++++++---
 1 file changed, 13 insertions(+), 3 deletions(-)

diff --git a/clojure-ts-mode.el b/clojure-ts-mode.el
index d58d14488f..e6a95b1f53 100644
--- a/clojure-ts-mode.el
+++ b/clojure-ts-mode.el
@@ -52,6 +52,11 @@
 ;;; Code:
 (require 'treesit)
 
+(defconst clojure-ts-mode-version
+  (eval-when-compile
+    (lm-version (or load-file-name buffer-file-name)))
+  "The current version of `clojure-ts-mode'.")
+
 (defconst clojure-ts-mode--builtin-dynamic-var-regexp
   (eval-and-compile
     (concat "^"
@@ -349,6 +354,11 @@
  'treesit-language-source-alist
  '(clojure "https://github.com/sogaiu/tree-sitter-clojure.git";))
 
+(defun clojure-ts-mode-display-version ()
+  "Display the current `clojure-mode-version' in the minibuffer."
+  (interactive)
+  (message "clojure-ts-mode (version %s)" clojure-ts-mode-version))
+
 ;;;###autoload
 (define-derived-mode clojure-ts-mode prog-mode "Clojure[TS]"
   "Major mode for editing Clojure code.
@@ -373,9 +383,9 @@ Requires Emacs 29 and libtree-sitter-clojure.so available 
somewhere in
     (setq treesit--indent-verbose t)
     (treesit-major-mode-setup)
     (treesit-inspect-mode)
-    ;(clojure-mode-variables)
-    ;(add-hook 'paredit-mode-hook #'clojure-paredit-setup)
-    ;(add-hook 'electric-indent-function 
#'clojure-mode--electric-indent-function)
+    ;; (clojure-mode-variables)
+    ;; (add-hook 'paredit-mode-hook #'clojure-paredit-setup)
+    ;; (add-hook 'electric-indent-function 
#'clojure-mode--electric-indent-function)
     ))
 
 ;; Redirect clojure-mode to clojure-ts-mode if clojure-mode is present



reply via email to

[Prev in Thread] Current Thread [Next in Thread]