Changeset 5536 for trunk

Timestamp:

May 17, 2015, 9:51:42 PM (9 years ago)

Author:

ldelgass

Message:

Print deprecation warnings for unirect2d/3d

Location:

trunk/gui/scripts

Files:

• field.tcl (modified) (2 diffs)
• unirect2d.tcl (modified) (1 diff)
• unirect3d.tcl (modified) (1 diff)

trunk/gui/scripts/field.tcl

@@ -1439 +1439 @@
     lappend _comp2fldName($cname) $name
 
-    # Handle bizarre cases that hopefully will be deprecated.
+    # Handle bizarre cases that are due to be removed.
     if { $element == "unirect3d" } {
-        # Special case: unirect3d (should be deprecated) + flow.
+        # Special case: unirect3d (deprecated) + flow.
         if { [$_field element $cname.extents] != "" } {
             set vectorsize [$_field get $cname.extents]
@@ -1474 +1474 @@
     }
     if { $element == "unirect2d" && [$_field element $cname.flow] != "" } {
-        # Special case: unirect2d (normally deprecated) + flow.
+        # Special case: unirect2d (deprecated) + flow.
         if { [$_field element $cname.extents] != "" } {
             set vectorsize [$_field get $cname.extents]

trunk/gui/scripts/unirect2d.tcl

@@ -165 +165 @@
     set _vtkdata $out
     set _isValid 1
+    puts stderr "WARNING: The <unirect2d> element is deprecated.  Please use a <mesh> instead."
 }
 

trunk/gui/scripts/unirect3d.tcl

@@ -110 +110 @@
         error "wrong \# of values in \"$cname.values\": expected $n values, got [$_values length]"
     }
+    puts stderr "WARNING: The <unirect3d> element is deprecated."
 }