Changeset 3358

Timestamp:

Dec 16, 2018, 7:20:26 PM (6 years ago)

Author:

Andreas Schnellbacher

Message:

• Fixed endless loop in RemoveMultipleEmptyLines.

File:

• trunk/src/netlabs/macros/keys.e (modified) (1 diff)

trunk/src/netlabs/macros/keys.e ¶

@@ -3333 +3333 @@
    Line = FirstLine
    do forever
-      if Line >= LastLine then
+      if Line >= Min( LastLine, .last) then  -- .last as an upper limit
          leave
       endif
       if textline( Line) = '' & textline( Line + 1) = '' then
          'DeleteLine' Line
+         LastLine = LastLine - 1
          n = n + 1
       else