[Rt-commit] r11886 - rt/branches/3.8-TESTING/lib/RT

sunnavy at bestpractical.com sunnavy at bestpractical.com
Thu Apr 24 23:41:20 EDT 2008


Author: sunnavy
Date: Thu Apr 24 23:41:17 2008
New Revision: 11886

Modified:
   rt/branches/3.8-TESTING/lib/RT/Installer.pm

Log:
rename Option to Meta, since similar hashes are called Meta in other pms

Modified: rt/branches/3.8-TESTING/lib/RT/Installer.pm
==============================================================================
--- rt/branches/3.8-TESTING/lib/RT/Installer.pm	(original)
+++ rt/branches/3.8-TESTING/lib/RT/Installer.pm	Thu Apr 24 23:41:17 2008
@@ -3,7 +3,7 @@
 use warnings;
 
 require UNIVERSAL::require;
-my %Option = (
+my %Meta = (
     DatabaseType => {
         Widget          => '/Widgets/Form/Select',
         WidgetArguments => {
@@ -133,8 +133,11 @@
 
 );
 
-sub Option {
-    return \%Option;
+sub Meta {
+    my $class = shift;
+    my $type = shift;
+    return $Meta{$type} if $type;
+    return \%Meta;
 }
 
 =head1 NAME
@@ -144,11 +147,11 @@
 =head1 SYNOPSYS
 
     use RT::Installer;
-    my $option = RT::Installer->Option;
+    my $meta = RT::Installer->Meta;
 
 =head1 DESCRIPTION
 
-C<RT::Installer> class provides access to RT Installer Options
+C<RT::Installer> class provides access to RT Installer Meta
 
 =cut
 


More information about the Rt-commit mailing list