From 69be982c4192af19dd36142e96ced5e9cdcad000 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Mon, 26 Sep 2022 13:00:58 +0300 Subject: [PATCH] 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 8ba8cab..c647417 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 -- 2.39.5