[Rt-commit] r9882 - in rt/branches/3.6-RELEASE: .

[sartak at bestpractical.com]

Author: sartak
Date: Tue Dec 11 08:37:35 2007
New Revision: 9882

Modified:
   rt/branches/3.6-RELEASE/   (props changed)
   rt/branches/3.6-RELEASE/html/Widgets/SelectionBox

Log:
 r48885 at onn:  sartak | 2007-12-11 08:37:30 -0500
 Add an optional Clear button to SelectionBox


Modified: rt/branches/3.6-RELEASE/html/Widgets/SelectionBox
==============================================================================
--- rt/branches/3.6-RELEASE/html/Widgets/SelectionBox	(original)
+++ rt/branches/3.6-RELEASE/html/Widgets/SelectionBox	Tue Dec 11 08:37:35 2007
@@ -146,6 +146,10 @@
 	}
     }
 
+    if ($ARGS{clear}) {
+        $current = [];
+    }
+
     $self->{Current} = $current;
 }
 
@@ -206,6 +210,9 @@
  <input name="movedown" type="submit" class="button" value=" &darr; " />
 % }
  <input name="remove" type="submit" class="button" value="<&|/l&>Delete</&>" />
+% if ($ARGS{'Clear'}) {
+ <input name="clear" type="submit" class="button" value="<&|/l&>Clear</&>" />
+% }
 
 % my $caption = "";
 % unless ($self->{'AutoSave'}) {