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

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

[nongnu] elpa/sweeprolog 69be982c41 150/166: FIXED: don't rely on string


From: ELPA Syncer
Subject: [nongnu] elpa/sweeprolog 69be982c41 150/166: FIXED: don't rely on string-lines added in Emacs 28.1
Date: Fri, 30 Sep 2022 04:59:34 -0400 (EDT)

branch: elpa/sweeprolog
commit 69be982c4192af19dd36142e96ced5e9cdcad000
Author: Eshel Yaron <me@eshelyaron.com>
Commit: Eshel Yaron <me@eshelyaron.com>

    FIXED: don't rely on string-lines added in Emacs 28.1
---
 sweep.el | 18 ++++++++++--------
 1 file changed, 10 insertions(+), 8 deletions(-)

diff --git a/sweep.el b/sweep.el
index 8ba8cabf0c..c647417f86 100644
--- a/sweep.el
+++ b/sweep.el
@@ -139,14 +139,16 @@ inserted to the input history in `sweep-top-level-mode' 
buffers."
 
 (defun sweep--ensure-module ()
   (let ((sweep-module-path (car
-                            (string-lines
-                             (shell-command-to-string
-                              (concat
-                               (or sweep-swipl-path (executable-find "swipl"))
-                               " -g"
-                               " write_sweep_module_location"
-                               " -t"
-                               " halt"))))))
+                            (save-match-data
+                              (split-string
+                               (shell-command-to-string
+                                (concat
+                                 (or sweep-swipl-path (executable-find 
"swipl"))
+                                 " -g"
+                                 " write_sweep_module_location"
+                                 " -t"
+                                 " halt"))
+                               "\n")))))
     (load sweep-module-path)))
 
 (defface sweep-debug-prefix-face



reply via email to

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