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 "")