branch: elpa/cider
commit 9d23b0857c9fd6c32e878fb728c159794ac7678e
Author: Bozhidar Batsov <[email protected]>
Commit: Bozhidar Batsov <[email protected]>

    Remove unused variables and constants
    
    - Remove cider-inspector-spacious-collections (defvar never referenced;
      code that used it was removed in a prior refactoring)
    - Remove cider-repl-history-separator-face (defcustom never wired up;
      the face is defined but never applied to the separator text)
    - Remove cider--clojure-execution-error and
      cider--clojure-spec-execution-error (rx fragments defined but never
      composed into any regexp)
---
 lisp/cider-eval.el         | 14 --------------
 lisp/cider-inspector.el    |  2 --
 lisp/cider-repl-history.el |  4 ----
 3 files changed, 20 deletions(-)

diff --git a/lisp/cider-eval.el b/lisp/cider-eval.el
index 47bde7d4995..5bfc4c9fc50 100644
--- a/lisp/cider-eval.el
+++ b/lisp/cider-eval.el
@@ -470,20 +470,6 @@ Show error overlay in BUFFER if needed."
 \"Syntax error compiling at (src/workspace_service.clj:227:3).\"
 \"Unexpected error (ClassCastException) macroexpanding defmulti at 
(src/haystack/parser.cljc:21:1).\"")
 
-(defconst cider--clojure-execution-error
-  `(sequence
-    (or "Error reading eval result "   ; phase = :read-eval-result
-        "Error printing return value " ; phase = :print-eval-result
-        "Execution error ")            ; phase = :execution
-    (minimal-match (zero-or-more anything)) ; optional class, eg. 
(ArithmeticException)
-    ,cider--clojure-1.10-location))
-
-(defconst cider--clojure-spec-execution-error
-  `(sequence
-    "Execution error - invalid arguments to "
-    (minimal-match (one-or-more anything))
-    " "
-    ,cider--clojure-1.10-location))
 
 (defconst cider-module-info-regexp
   (rx " ("
diff --git a/lisp/cider-inspector.el b/lisp/cider-inspector.el
index 98313bdf50a..4c504b9c835 100644
--- a/lisp/cider-inspector.el
+++ b/lisp/cider-inspector.el
@@ -71,8 +71,6 @@ The max depth can be also changed interactively within the 
inspector."
   :type '(integer :tag "Max nested collection depth" 5)
   :package-version '(cider . "1.14.0"))
 
-(defvar cider-inspector-spacious-collections nil
-  "Controls whether the inspector renders values in collections spaciously.")
 
 (defcustom cider-inspector-fill-frame nil
   "Controls whether the CIDER inspector window fills its frame."
diff --git a/lisp/cider-repl-history.el b/lisp/cider-repl-history.el
index 8562e6901c2..070d2dceb9c 100644
--- a/lisp/cider-repl-history.el
+++ b/lisp/cider-repl-history.el
@@ -149,10 +149,6 @@ face used for highlighting."
   :type '(choice (const nil) (const t) (const solid) (const pulse))
   :package-version '(cider . "0.15.0"))
 
-(defcustom cider-repl-history-separator-face 'bold
-  "The face in which to highlight the `cider-repl-history-separator'."
-  :type 'face
-  :package-version '(cider . "0.15.0"))
 
 (defcustom cider-repl-history-current-entry-face 'highlight
   "The face in which to highlight the command history current entry."

Reply via email to