fixes for new treestate admin code.

webtools/tinderbox2/src/bin/admintree.cgi

@@ -7,8 +7,8 @@
 #		 columns from being shown on the default pages.
 
 
-# $Revision: 1.21 $ 
-# $Date: 2002-05-01 01:52:53 $ 
+# $Revision: 1.22 $ 
+# $Date: 2002-05-03 02:21:52 $ 
 # $Author: kestes%walrus.com $ 
 # $Source: /home/jrmuizel/cvs-mirror/mozilla/webtools/tinderbox2/src/bin/admintree.cgi,v $ 
 # $Name:  $ 
@@ -234,7 +234,9 @@ sub get_current_ignore_builds  {
 sub format_input_page {
   my ($tree)= @_;
   my (@build_names) = get_build_names($tree);
-  my (@tree_states) = TreeData::get_all_sorted_tree_states($tree);
+  my (@tree_states) = $TinderHeader::NAMES2OBJS{'TreeState'}->
+      get_all_sorted_setable_tree_states();
+
   my ($title) = "Tinderbox Adminstration for Tree: $tree";
   my (@out);
 

webtools/tinderbox2/src/lib/TinderHeader/TreeState.pm

@@ -8,8 +8,8 @@
 
 
 
-# $Revision: 1.4 $ 
-# $Date: 2001-07-20 19:05:19 $ 
+# $Revision: 1.5 $ 
+# $Date: 2002-05-03 02:21:49 $ 
 # $Author: kestes%walrus.com $ 
 # $Source: /home/jrmuizel/cvs-mirror/mozilla/webtools/tinderbox2/src/lib/TinderHeader/TreeState.pm,v $ 
 # $Name:  $ 
@@ -58,7 +58,7 @@ use TinderHeader::BasicTxtHeader;
 
 @ISA = qw(TinderHeader::BasicTxtHeader);
 
-$VERSION = ( qw $Revision: 1.4 $ )[1];
+$VERSION = ( qw $Revision: 1.5 $ )[1];
 
 # load the simple name of this module into TinderHeader so we can
 # track the implementations provided.
@@ -66,4 +66,11 @@ $VERSION = ( qw $Revision: 1.4 $ )[1];
 $TinderHeader::NAMES2OBJS{ 'TreeState' } = 
   TinderHeader::TreeState->new();
 
+sub get_all_sorted_setable_tree_states {
+
+    my @valid_states = TreeData::get_all_sorted_tree_states();
+
+  return @valid_states;
+}
+
 1;

webtools/tinderbox2/src/lib/TinderHeader/TreeState_Bonsai.pm

@@ -6,8 +6,8 @@
 # the current tree state using the bonsai conventions when we have
 # implemented it.  
 
-# $Revision: 1.6 $ 
-# $Date: 2001-08-13 19:49:36 $ 
+# $Revision: 1.7 $ 
+# $Date: 2002-05-03 02:21:49 $ 
 # $Author: kestes%walrus.com $ 
 # $Source: /home/jrmuizel/cvs-mirror/mozilla/webtools/tinderbox2/src/lib/TinderHeader/TreeState_Bonsai.pm,v $ 
 # $Name:  $ 
@@ -50,7 +50,7 @@ use BonsaiData;
 
 
 
-$VERSION = ( qw $Revision: 1.6 $ )[1];
+$VERSION = ( qw $Revision: 1.7 $ )[1];
 
 # load the simple name of this module into TinderHeader so we can
 # track the implementations provided.
@@ -87,5 +87,12 @@ sub savetree_header {
   return ;
 }
 
+sub get_all_sorted_setable_tree_states {
+
+    my @valid_states = ('Open', 'Closed' );
+
+    return @valid_states;
+}
+
 1;