[Rt-commit] rtir branch, 2.6/perlcritic, updated. 2.6.0-40-g0a07403

[Alex Vandiver]

The branch, 2.6/perlcritic has been updated
       via  0a0740311d2ff51c1d04538556a1785562b71ced (commit)
      from  e82596d1255b7f9a4542278c46385c75ad371dec (commit)

Summary of changes:
 lib/RT/IR.pm                          |    5 +++--
 t/custom-fields/defaults-on-linking.t |    2 +-
 2 files changed, 4 insertions(+), 3 deletions(-)

- Log -----------------------------------------------------------------
commit 0a0740311d2ff51c1d04538556a1785562b71ced
Author: Alex Vandiver <alexmv at bestpractical.com>
Date:   Mon Aug 1 16:35:01 2011 -0400

    Promote _FlushCustomFieldsCache into a public method

diff --git a/lib/RT/IR.pm b/lib/RT/IR.pm
index fe464df..3ac2e19 100644
--- a/lib/RT/IR.pm
+++ b/lib/RT/IR.pm
@@ -283,8 +283,9 @@ sub CustomFields {
     return wantarray? @list : $list[0];
 }
 
-sub _FlushCustomFieldsCache {
-    %cache = ()
+sub FlushCustomFieldsCache {
+    %cache = ();
+    return 1;
 } }
 
 { my $cache;
diff --git a/t/custom-fields/defaults-on-linking.t b/t/custom-fields/defaults-on-linking.t
index c75a57a..c25a213 100644
--- a/t/custom-fields/defaults-on-linking.t
+++ b/t/custom-fields/defaults-on-linking.t
@@ -29,7 +29,7 @@ my $cf_name = 'test';
     }
 
     RT::IR::Test->add_rights( Principal => 'everyone', Right => ['SeeCustomField', 'ModifyCustomField']);
-    RT::IR->_FlushCustomFieldsCache;
+    RT::IR->FlushCustomFieldsCache;
 }
 
 

-----------------------------------------------------------------------