bugfix: scrolling up using scroll wheel

The culprit is an ambiguously named helper. put_cursor_on_next_text_line
is not supposed to move to next line if the current line is text.

2 files changed, 12 insertions, 12 deletions

diff --git a/edit.lua b/edit.lua
index 03565f8..269d6ef 100644
--- a/edit.lua
+++ b/edit.lua
@@ -141,13 +141,13 @@ end
 
 function edit.put_cursor_on_next_text_line(State)
   local line = State.cursor1.line
-  while line < #State.lines do
+  if State.lines[line].mode == 'text' then return end
+  while line <= #State.lines and State.lines[line].mode ~= 'text' do
     line = line+1
-    if State.lines[line].mode == 'text' then
-      State.cursor1.line = line
-      State.cursor1.pos = 1
-      break
-    end
+  end
+  if line <= #State.lines and State.lines[line].mode == 'text' then
+    State.cursor1.line = line
+    State.cursor1.pos = 1
   end
 end
 
diff --git a/source_edit.lua b/source_edit.lua
index a8dd682..91bcb58 100644
--- a/source_edit.lua
+++ b/source_edit.lua
@@ -143,13 +143,13 @@ end
 
 function edit.put_cursor_on_next_text_line(State)
   local line = State.cursor1.line
-  while line < #State.lines do
+  if State.lines[line].mode == 'text' then return end
+  while line <= #State.lines and State.lines[line].mode ~= 'text' do
     line = line+1
-    if State.lines[line].mode == 'text' then
-      State.cursor1.line = line
-      State.cursor1.pos = 1
-      break
-    end
+  end
+  if line <= #State.lines and State.lines[line].mode == 'text' then
+    State.cursor1.line = line
+    State.cursor1.pos = 1
   end
 end