clear else

KratosMultiphysics · Oct 27, 2023 · d6a40eb · d6a40eb
1 parent 591b0f8
commit d6a40eb
Showing 1 changed file with 7 additions and 6 deletions.
diff --git a/kratos.gid/scripts/Writing/WriteSubModelPart.tcl b/kratos.gid/scripts/Writing/WriteSubModelPart.tcl
@@ -253,11 +253,12 @@ proc write::getSubModelPartId {cid group} {
         set name [write::GetWriteGroupName $group]
         set good_name [write::transformGroupName $name]
         return $good_name
-    }
-    set find [list $cid ${group}]
-    if {[dict exists $submodelparts $find]} {
-        return [dict get $submodelparts [list $cid ${group}]]
-    } {
-        return 0
+    } else {
+        set find [list $cid ${group}]
+        if {[dict exists $submodelparts $find]} {
+            return [dict get $submodelparts [list $cid ${group}]]
+        } {
+            return 0
+        }
     }
 }