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."