From 1507ef18b85c18a005d9b46071b294d52a2a025d Mon Sep 17 00:00:00 2001
From: fpi
Date: Sun, 23 Aug 2020 18:43:39 +0200
Subject: Minor function changes/fixes

---
 ob-spice.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/ob-spice.el b/ob-spice.el
index 982765e..0e228ad 100644
--- a/ob-spice.el
+++ b/ob-spice.el
@@ -103,7 +103,7 @@ default-directory or DIR if specified."
             (setq body (replace-regexp-in-string
                         (format "\\$%s\\([ \.]\\)\\|\\$%s$" (car pair)
                                 (car pair))
-                        (format "%s\1" (cdr pair))
+                        (format "%s\\1" (cdr pair))
                         body)))
           vars)
     body))
@@ -194,18 +194,18 @@ started."
 	      (mapconcat
 	       #'org-trim
 	       (org-babel-comint-with-output (buffer org-babel-spice-eoe-indicator t eval-body)
-		 (mapcar (lambda (line)
-			   (insert (org-babel-chomp line)) (comint-send-input nil t))
-			 (list eval-body
-			       eoe-string
-			       "\n")))
+		 (mapc (lambda (line)
+			 (insert (org-babel-chomp line)) (comint-send-input nil t))
+		       (list eval-body
+			     eoe-string
+			     "\n")))
 	       "\n") "[\r\n]")) 2) "\n"))))
        )
       (`value
        (let ((tmp-file (org-babel-temp-file "spice-")))
 	 (org-babel-comint-with-output
 	     (buffer org-babel-spice-eoe-indicator t eval-body)
-	   (mapcar
+	   (mapc
 	    (lambda (line)
 	      (insert (org-babel-chomp line)) (comint-send-input nil t))
 	    (append (list eval-body)
-- 
cgit v1.2.3