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

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

[nongnu] elpa/geiser-kawa fe548f9 104/119: melpa/melpa#6858 - Rename non


From: Philip Kaludercic
Subject: [nongnu] elpa/geiser-kawa fe548f9 104/119: melpa/melpa#6858 - Rename non-standard "geiser-kawa-util--eval/result" to "geiser-kawa-util--eval-get-result"
Date: Sun, 1 Aug 2021 18:30:47 -0400 (EDT)

branch: elpa/geiser-kawa
commit fe548f98ab091a353b63916af9f03d4448587cb0
Author: spellcard199 <spellcard199@protonmail.com>
Commit: spellcard199 <spellcard199@protonmail.com>

    melpa/melpa#6858 - Rename non-standard "geiser-kawa-util--eval/result" to 
"geiser-kawa-util--eval-get-result"
---
 README.org                            | 2 +-
 elisp/geiser-kawa-devutil-complete.el | 2 +-
 elisp/geiser-kawa-devutil-exprtree.el | 2 +-
 elisp/geiser-kawa-util.el             | 4 ++--
 4 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/README.org b/README.org
index 38e1c8e..a3f9bff 100644
--- a/README.org
+++ b/README.org
@@ -172,7 +172,7 @@ displays them in a dedicated buffer."
   ;; Eval our Kawa code and insert result of evaluation in the buffer
   ;; we switched to above.
   (insert
-   (geiser-kawa-util--eval/result
+   (geiser-kawa-util--eval-get-result
      ;; The same kawa code as above, quoted so that it's not evaluated
      ;; as elisp.
     '(let* ((cg (kawadevutil.shaded.io.github.classgraph.ClassGraph))
diff --git a/elisp/geiser-kawa-devutil-complete.el 
b/elisp/geiser-kawa-devutil-complete.el
index 94178c3..4812476 100644
--- a/elisp/geiser-kawa-devutil-complete.el
+++ b/elisp/geiser-kawa-devutil-complete.el
@@ -229,7 +229,7 @@ Argument CODE-STR is a string containing the code where 
completion
 must happen.  It must be syntactically correct Kawa scheme.
 Argument CURSOR-INDEX is an integer representing where the cursor is
 inside `CURSOR-STR'."
-  (geiser-kawa-util--eval/result
+  (geiser-kawa-util--eval-get-result
    `(geiser:kawa-devutil-complete-expr-tree
      ,code-str
      ,cursor-index)))
diff --git a/elisp/geiser-kawa-devutil-exprtree.el 
b/elisp/geiser-kawa-devutil-exprtree.el
index 65d4a3f..954a7e8 100644
--- a/elisp/geiser-kawa-devutil-exprtree.el
+++ b/elisp/geiser-kawa-devutil-exprtree.el
@@ -32,7 +32,7 @@
 
 (defun geiser-kawa-devutil-exprtree--for (code-str)
   "Get the Expression tree for CODE-STR."
-  (geiser-kawa-util--eval/result
+  (geiser-kawa-util--eval-get-result
    `(geiser:kawa-devutil-expr-tree-formatted ,code-str)))
 
 (defun geiser-kawa-devutil-exprtree--view-for (code-str)
diff --git a/elisp/geiser-kawa-util.el b/elisp/geiser-kawa-util.el
index 33e6ec3..1f619fe 100644
--- a/elisp/geiser-kawa-util.el
+++ b/elisp/geiser-kawa-util.el
@@ -62,8 +62,8 @@ Drawback is that `RET' must be valid elisp, while
 reader."
   (car (read-from-string (cadr (assoc 'result ret)))))
 
-(defun geiser-kawa-util--eval/result (sexp-or-str
-                                      &optional retort-result)
+(defun geiser-kawa-util--eval-get-result (sexp-or-str
+                                          &optional retort-result)
   "Alternative to `geiser-eval--send/result' with custom behavior.
 - `sexp-or-str' is wrapped by:
   (geiser:eval (interaction-environment) ...)



reply via email to

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