[popfile-commit] engine/UI HTML.pm,1.188,1.189

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

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

Modified Files:
	HTML.pm 
Log Message:
Add favicon

Index: HTML.pm
===================================================================
RCS file: /cvsroot/popfile/engine/UI/HTML.pm,v
retrieving revision 1.188
retrieving revision 1.189
diff -C2 -d -r1.188 -r1.189
*** HTML.pm	31 Jul 2003 16:32:22 -0000	1.188
--- HTML.pm	20 Aug 2003 01:40:12 -0000	1.189
***************
*** 349,352 ****
--- 349,354 ----
      my ( $self, $client, $url, $command, $content ) = @_;
  
+     $self->log_( $url );
+ 
      # See if there are any form parameters and if there are parse them into the %form hash
  
***************
*** 387,390 ****
--- 389,397 ----
      }
  
+     if ( $url =~ /\/(.+\.ico)/ ) {
+         $self->http_file_( $client, $1, 'image/x-icon' );
+         return 1;
+     }
+ 
      if ( $url =~ /(skins\/.+\.css)/ ) {
          $self->http_file_( $client, $1, 'text/css' );
***************
*** 627,630 ****
--- 634,639 ----
          $result .= "<link rel=\"stylesheet\" type=\"text/css\" ";
          $result .= "href=\"skins/" . $self->config_( 'skin' ) . ".css\" title=\"" . $self->config_( 'skin' ) . "\">\n";
+ 	$result .= "<link rel=\"shortcut icon\" type=\"image/x-icon\" ";
+ 	$result .= "href=\"favicon.ico\"" . "\">\n";
      }