[Rt-commit] r11892 - rt/branches/3.8-TESTING/html/installation/Elements

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Fri Apr 25 05:08:29 2008
New Revision: 11892

Modified:
   rt/branches/3.8-TESTING/html/installation/Elements/Edit

Log:
a more general edit widget comp

Modified: rt/branches/3.8-TESTING/html/installation/Elements/Edit
==============================================================================
--- rt/branches/3.8-TESTING/html/installation/Elements/Edit	(original)
+++ rt/branches/3.8-TESTING/html/installation/Elements/Edit	Fri Apr 25 05:08:29 2008
@@ -1,15 +1,19 @@
 % for my $type ( @$Types ) {
-<& $RT::Installer->{Meta}{$type}{'Widget'},
-    Default      => 0,
-    %{ $RT::Installer->{Meta}{$type}{'WidgetArguments'} },
+<& $Meta->{$type}{'Widget'},
+    Default      => $Default,
+    %{ $Meta->{$type}{'WidgetArguments'} },
     Name         => $type,
-    CurrentValue => exists $RT::Installer->{InstallConfig}{$type} ?
-        $RT::Installer->{InstallConfig}{$type} :
-        scalar RT->Config->Get($type),
+    exists $CurrentValue->{$type} ? ( CurrentValue => $CurrentValue->{$type} )
+        : (),
+    exists $DefaultValue->{$type} ? ( DefaultValue => $DefaultValue->{$type} )
+        : (),
 &>
 % }
 
-
 <%args>
 $Types
+$Meta
+$Default => 0
+$CurrentValue => {}
+$DefaultValue => {}
 </%args>