From: Eshel Yaron <me@eshelyaron.com>
Date: Sat, 19 Nov 2022 20:09:11 +0000 (+0200)
Subject: * (sweeprolog-predicate-completion-at-point): fix pcase match
X-Git-Tag: V8.5.20-sweep-0.8.9~2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ac344f888b835d244cad2a3200c9e4a55404f590;p=sweep.git

* (sweeprolog-predicate-completion-at-point): fix pcase match
---

diff --git a/sweeprolog.el b/sweeprolog.el
index 4d66835..2ccd786 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -1068,7 +1068,7 @@ resulting list even when found in the current clause."
                                (`(compound
                                   "term_position"
                                   0 ,length
-                                  fbeg fend
+                                  ,_fbeg ,_fend
                                   ,holes)
                                 (with-silent-modifications
                                   (dolist (hole holes)