lispy.el (lispy-eval-alist): No special behavior on (eq arg 3)

Basically reverts 11a1fd6

Author: abo-abo

le-clojure.el

@@ -91,12 +91,12 @@
     (t
      e-str)))
 
-(defun lispy-eval-clojure (e-str &optional _plain)
-  "User facing eval."
+(defun lispy-eval-clojure (str)
+  "Eval STR as a Clojure expression."
   (lispy--clojure-detect-ns)
   (if (eq lispy-clojure-eval-method 'spiral)
-      (lispy--eval-clojure-spiral e-str)
-    (lispy--eval-clojure-cider e-str)))
+      (lispy--eval-clojure-spiral str)
+    (lispy--eval-clojure-cider str)))
 
 ;;* Start REPL wrapper for eval
 (defvar lispy--clojure-hook-lambda nil

le-julia.el

@@ -27,7 +27,7 @@
 
 (declare-function julia-shell-collect-command-output "ext:julia-shell")
 
-(defun lispy--eval-julia (str &optional _plain)
+(defun lispy--eval-julia (str)
   "Eval STR as Julia code."
   (string-trim-right (julia-shell-collect-command-output str)))
 
@@ -65,8 +65,8 @@
            (setcar bnd (point))
            (lispy--string-dwim bnd)))))
 
-(defun lispy-eval-julia (&optional plain)
-  (lispy--eval-julia (lispy-eval-julia-str) plain))
+(defun lispy-eval-julia ()
+  (lispy--eval-julia (lispy-eval-julia-str)))
 
 (provide 'le-julia)
 

le-racket.el

@@ -43,7 +43,7 @@
         (accept-process-output nil 0.001))
       (substring response 1 -2))))
 
-(defun lispy-eval-racket (&optional _plain)
+(defun lispy-eval-racket ()
   (lispy--eval-racket (lispy--string-dwim)))
 
 (provide 'le-racket)

lispy.el

@@ -4350,7 +4350,7 @@ SYMBOL is a string."
   '((python-mode
      le-python lispy--eval-python lispy-eval-python-str lispy-eval-python-bnd)
     (julia-mode
-     le-julia lispy-eval-julia nil lispy-eval-julia-str)
+     le-julia lispy-eval-julia lispy-eval-julia-str nil)
     (clojure-mode
      le-clojure lispy-eval-clojure nil nil)
     (clojurescript-mode
@@ -4381,8 +4381,7 @@ When ARG is 2, insert the result as a comment."
                  (require (nth 0 handler))
                  (setq res (funcall
                             (nth 1 handler)
-                            (funcall (or (nth 2 handler) #'lispy--string-dwim))
-                            (eq arg 3))))
+                            (funcall (or (nth 2 handler) #'lispy--string-dwim)))))
              (setq res (lispy--eval-default)))
            (when (member res '(nil ""))
              (setq res lispy-eval-error))