[popfile-commit] engine/UI HTML.pm,1.194,1.195

[<jgr...@us...>]

Update of /cvsroot/popfile/engine/UI
In directory sc8-pr-cvs1:/tmp/cvs-serv14382/UI

Modified Files:
	HTML.pm 
Log Message:
All bucket drop downs now use an inline style attribute to set the bucket color

Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.194
retrieving revision 1.195
diff -C2 -d -r1.194 -r1.195
*** HTML.pm	22 Aug 2003 02:06:27 -0000	1.194
--- HTML.pm	22 Aug 2003 14:31:08 -0000	1.195
***************
*** 1610,1614 ****
                  foreach my $mbucket (@buckets) {
                      my $selected = ( $bucket eq $mbucket )?"selected":"";
!                     $body .= "<option value=\"$mbucket\" $selected>$mbucket</option>\n";
                  }
                  $body .= "</select></td>\n";
--- 1610,1615 ----
                  foreach my $mbucket (@buckets) {
                      my $selected = ( $bucket eq $mbucket )?"selected":"";
!                     my $bcolor   = $self->{classifier__}->get_bucket_color( $mbucket );
!                     $body .= "<option value=\"$mbucket\" $selected style=\"color: $bcolor\">$mbucket</option>\n";
                  }
                  $body .= "</select></td>\n";
***************
*** 1671,1675 ****
      my @buckets = $self->{classifier__}->get_buckets();
      foreach my $bucket (@buckets) {
!         $body .= "<option value=\"$bucket\">$bucket</option>\n";
      }
      $body .= "</select>\n<input type=\"submit\" class=\"submit\" name=\"create\" value=\"$self->{language__}{Create}\" />\n";
--- 1672,1677 ----
      my @buckets = $self->{classifier__}->get_buckets();
      foreach my $bucket (@buckets) {
!         my $bcolor = $self->{classifier__}->get_bucket_color( $bucket );
!         $body .= "<option value=\"$bucket\" style=\"color: $bcolor\">$bucket</option>\n";
      }
      $body .= "</select>\n<input type=\"submit\" class=\"submit\" name=\"create\" value=\"$self->{language__}{Create}\" />\n";
***************
*** 2157,2161 ****
  
      foreach my $bucket (@buckets) {
!         $body .= "<option value=\"$bucket\">$bucket</option>\n";
      }
      $body .= "</select>\n<input type=\"submit\" class=\"submit\" name=\"delete\" value=\"$self->{language__}{Delete}\" />\n";
--- 2159,2164 ----
  
      foreach my $bucket (@buckets) {
!         my $bcolor = $self->{classifier__}->get_bucket_color( $bucket );
!         $body .= "<option value=\"$bucket\" style=\"color: $bcolor\">$bucket</option>\n";
      }
      $body .= "</select>\n<input type=\"submit\" class=\"submit\" name=\"delete\" value=\"$self->{language__}{Delete}\" />\n";
***************
*** 2167,2171 ****
  
      foreach my $bucket (@buckets) {
!         $body .= "<option value=\"$bucket\">$bucket</option>\n";
      }
      $body .= "</select>\n<label class=\"bucketsLabel\" for=\"bucketsRenameBucketTo\">$self->{language__}{Bucket_To}</label>\n";
--- 2170,2175 ----
  
      foreach my $bucket (@buckets) {
!         my $bcolor = $self->{classifier__}->get_bucket_color( $bucket );
!         $body .= "<option value=\"$bucket\" style=\"color: $bcolor\">$bucket</option>\n";
      }
      $body .= "</select>\n<label class=\"bucketsLabel\" for=\"bucketsRenameBucketTo\">$self->{language__}{Bucket_To}</label>\n";
***************
*** 3003,3009 ****
      my @buckets = $self->{classifier__}->get_buckets();
      foreach my $abucket (@buckets) {
          $body .= "<option value=\"$abucket\"";
          $body .= " selected" if ( ( defined($self->{form_}{filter}) ) && ( $self->{form_}{filter} eq $abucket ) );
!         $body .= ">$abucket</option>\n";
      }
      $body .= "<option value=\"__filter__magnet\"" . ($self->{form_}{filter} eq '__filter__magnet'?' selected':'') . ">&lt;$self->{language__}{History_ShowMagnet}&gt;</option>\n";
--- 3007,3014 ----
      my @buckets = $self->{classifier__}->get_buckets();
      foreach my $abucket (@buckets) {
+         my $bcolor = $self->{classifier__}->get_bucket_color( $abucket );
          $body .= "<option value=\"$abucket\"";
          $body .= " selected" if ( ( defined($self->{form_}{filter}) ) && ( $self->{form_}{filter} eq $abucket ) );
!         $body .= " style=\"color: $bcolor\">$abucket</option>\n";
      }
      $body .= "<option value=\"__filter__magnet\"" . ($self->{form_}{filter} eq '__filter__magnet'?' selected':'') . ">&lt;$self->{language__}{History_ShowMagnet}&gt;</option>\n";
***************
*** 3279,3283 ****
  
                      foreach my $abucket (@buckets) {
!                         $body .= "<option value=\"$abucket\">$abucket</option>\n";
                      }
                      $body .= "</select>\n";
--- 3284,3289 ----
  
                      foreach my $abucket (@buckets) {
!                         my $bcolor = $self->{classifier__}->get_bucket_color( $abucket );
!                         $body .= "<option value=\"$abucket\" style=\"color: $bcolor\">$abucket</option>\n";
                      }
                      $body .= "</select>\n";
***************
*** 3452,3456 ****
  
                  foreach my $abucket ($self->{classifier__}->get_buckets()) {
!                     $body .= "<option value=\"$abucket\">$abucket</option>\n";
                  }
                  $body .= "</select>\n<input type=\"submit\" class=\"reclassifyButton\" name=\"change\" value=\"$self->{language__}{Reclassify}\" />";
--- 3458,3463 ----
  
                  foreach my $abucket ($self->{classifier__}->get_buckets()) {
!                     my $bcolor = $self->{classifier__}->get_bucket_color( $abucket );
!                     $body .= "<option value=\"$abucket\" style=\"color: $bcolor\">$abucket</option>\n";
                  }
                  $body .= "</select>\n<input type=\"submit\" class=\"reclassifyButton\" name=\"change\" value=\"$self->{language__}{Reclassify}\" />";