Changeset 3000

Timestamp:

Apr 19, 2018, 11:28:32 PM (7 years ago)

Author:

Andreas Schnellbacher

Message:

• Fixed finding of the first shell: Handle case when shell with number 1 was closed.

File:

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

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

@@ -297 +297 @@
          ShellStartFid = CurFid
          if fSwitch then
-            -- Find first shell buffer
-            ShellNum = 1
+            -- Find first shell buffer, handle already closed shells
+            do n = 1 to shell_index
+               if GetAVar( 'Shell_f'n) <> '' then
+                  ShellNum = n
+                  leave
+               endif
+            enddo
          else
             -- Find last shell buffer to execute a command there