[nongnu] elpa/sweeprolog e230fea5ed 2/2: FIXED: error when indenting after prefix operator

[ELPA Syncer]

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

    FIXED: error when indenting after prefix operator
---
 sweeprolog.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/sweeprolog.el b/sweeprolog.el
index a9243793b7..137539f72a 100644
--- a/sweeprolog.el
+++ b/sweeprolog.el
@@ -1782,7 +1782,7 @@ Interactively, a prefix arg means to prompt for BUFFER."
              (sweeprolog--forward-term pre))
          (if-let ((ppre (sweeprolog-op-suffix-precedence
                          (buffer-substring-no-properties obeg oend))))
-             (if (> opre pre)
+             (if (> ppre pre)
                  (signal 'scan-error
                          (list (format "Cannot scan beyond suffix operator of 
higher precedence %s." opre)
                                obeg
@@ -1803,7 +1803,7 @@ Interactively, a prefix arg means to prompt for BUFFER."
            (sweeprolog--forward-term pre))
        (if-let ((ppre (sweeprolog-op-prefix-precedence
                        (buffer-substring-no-properties obeg oend))))
-           (if (> opre pre)
+           (if (> ppre pre)
                (signal 'scan-error
                        (list (format "Cannot scan backwards beyond prefix 
operator of higher precedence %s." opre)
                              obeg
@@ -1856,7 +1856,7 @@ Interactively, a prefix arg means to prompt for BUFFER."
              (sweeprolog--backward-term pre))
          (if-let ((ppre (sweeprolog-op-prefix-precedence
                          (buffer-substring-no-properties obeg oend))))
-             (if (> opre pre)
+             (if (> ppre pre)
                  (signal 'scan-error
                          (list (format "Cannot scan backwards beyond prefix 
operator of higher precedence %s." opre)
                                obeg
@@ -1877,7 +1877,7 @@ Interactively, a prefix arg means to prompt for BUFFER."
            (sweeprolog--backward-term pre))
        (if-let ((ppre (sweeprolog-op-prefix-precedence
                        (buffer-substring-no-properties obeg oend))))
-           (if (> opre pre)
+           (if (> ppre pre)
                (signal 'scan-error
                        (list (format "Cannot scan backwards beyond prefix 
operator of higher precedence %s." opre)
                              obeg