1 files changed, 5 insertions, 3 deletions
diff --git a/testautomation/graphics/optional/includes/global/g_line.inc b/testautomation/graphics/optional/includes/global/g_line.inc
index eb672b3b9716..758f537c5630 100644
--- a/testautomation/graphics/optional/includes/global/g_line.inc
+++ b/testautomation/graphics/optional/includes/global/g_line.inc
@@ -363,6 +363,7 @@ testcase tLineConnect
     Dim i as integer
     Dim cname as string
     Dim cfirst as integer
+    Dim CornerStyles as integer
     
     if bAsianLan then 
      QaErrorLog "tLineConnect ends because Asian languages are not fully supported."
@@ -517,10 +518,11 @@ testcase tLineConnect
     else
         sleep 1
     endif
+
+    For i = 1 to CornerStyles
+    Kontext "TabLinie"
+    if (i > 1) AND (cname <> CornerStyle.GetSelText) then
     
-    For i = 1 to CornerStyle.GetItemCount
-      Kontext "TabLinie"
-      if (i > 1) AND (cname <> CornerStyle.GetSelText) then
          warnlog "Cornerstylename wasnt saved. Should have been: " + cname + ". But was: " + CornerStyle.GetSelText
       endif
       CornerStyle.Select i