[Rt-commit] r6009 - in rtir/branches/2.1-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Wed Sep 20 22:38:18 2006
New Revision: 6009

Modified:
   rtir/branches/2.1-EXPERIMENTAL/   (props changed)
   rtir/branches/2.1-EXPERIMENTAL/t/rtir-test.pl

Log:
 r1602 at cubic-pc:  cubic | 2006-09-21 03:51:35 +0400
 tests
 * return boolean status from set_custom_field util


Modified: rtir/branches/2.1-EXPERIMENTAL/t/rtir-test.pl
==============================================================================
--- rtir/branches/2.1-EXPERIMENTAL/t/rtir-test.pl	(original)
+++ rtir/branches/2.1-EXPERIMENTAL/t/rtir-test.pl	Wed Sep 20 22:38:18 2006
@@ -39,9 +39,9 @@
     my $cf_name = shift;
     my $val = shift;
 
-    my $field_name = $agent->value($cf_name);
-#    diag("found $cf_name at $field_name");
+    my $field_name = $agent->value($cf_name) or return 0;
     $agent->field($field_name, $val);
+    return 1;
 }
 
 sub go_home {