branch: elpa/isl
commit 393a2c3f88dfc3fa618d9e0449db773ef396ce68
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>

    Fix initial direction when iterator is not yet built
---
 isl.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/isl.el b/isl.el
index e4c4600fd11..54aa4b704c2 100644
--- a/isl.el
+++ b/isl.el
@@ -1057,9 +1057,10 @@ See `isl-requires-pattern'."
                               (> (point) isl-initial-pos))
                          isl-after-position-string
                        isl-before-position-string)))
-        (direction (if (eq (isl-iterator--direction isl--iterator) 'forward)
-                       isl-direction-down-string
-                     isl-direction-up-string)))
+        (direction (when isl--iterator
+                     (if (eq (isl-iterator--direction isl--iterator) 'right)
+                         isl-direction-down-string
+                       isl-direction-up-string))))
     (when (numberp isl--number-results)
       (setq mode-line-format
             (cond ((or (string= isl-pattern "")

Reply via email to