Changeset 13807 for branches/Release01x01/UnitTestContrib/test/unit/Fn_FORMAT.pm

Timestamp:

01/24/12 06:48:30 (4 months ago)

Author:

PaulHarvey

Message:

Item11468: Give FORMAT{"0" a format string

File:

• branches/Release01x01/UnitTestContrib/test/unit/Fn_FORMAT.pm (modified) (1 diff)

branches/Release01x01/UnitTestContrib/test/unit/Fn_FORMAT.pm

@@ -712 +712 @@
     my $this = shift;
 
-    my $result = $this->{test_topicObject}->expandMacros('%FORMAT{"0"}%');
+    my $result = $this->{test_topicObject}->expandMacros(<<'HERE');
+%FORMAT{"0" type="string" format="$item"}%
+HERE
+    chomp($result);
 
     $this->assert_str_equals( '0', $result );