branch: elpa/sweeprolog
commit a3228e96c057f212c0b3924fde09cba0b403e47c
Author: Eshel Yaron <[email protected]>
Commit: Eshel Yaron <[email protected]>
; * sweeprolog.el (-predicate-completion-candidates): Fix typo
---
sweeprolog.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/sweeprolog.el b/sweeprolog.el
index 00822e31c0..65f63fd8a9 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -1469,7 +1469,7 @@ list even when found in the current clause."
(afirst t) (bfirst nil))
(cond
((and aargs (not bargs)) afirst)
- ((and bargs (not bargs)) bfirst)
+ ((and bargs (not aargs)) bfirst)
((< aflen bflen) afirst)
((< bflen aflen) bfirst)
((< arity brity) afirst)
