oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Added configurable favicon and site icon support.

Browse source
This commit is contained in:
JT Smith 2003-04-12 23:33:56 +00:00
parent 0edcfad5f5
commit 8898dd3323
4 changed files with 24 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/WebGUI/Operation/Settings.pm
View file

@ -92,6 +92,16 @@ sub www_editContentSettings {
$f->select("defaultPage",$pages,WebGUI::International::get(527),[$session{setting}{defaultPage}]);
$f->select("notFoundPage",$pages,WebGUI::International::get(141),[$session{setting}{notFoundPage}]);
$f->text("docTypeDec",WebGUI::International::get(398),$session{setting}{docTypeDec});
$f->text(
-name=>"favicon",
-label=>WebGUI::International::get(897),
-value=>$session{setting}{favicon}
);
$f->text(
-name=>"siteicon",
-label=>WebGUI::International::get(898),
-value=>$session{setting}{siteicon}
);
$f->integer("maxAttachmentSize",WebGUI::International::get(130),$session{setting}{maxAttachmentSize});
$f->integer("maxImageSize",WebGUI::International::get(583),$session{setting}{maxImageSize});
$f->integer("thumbnailSize",WebGUI::International::get(406),$session{setting}{thumbnailSize});

8
lib/WebGUI/Style.pm
View file

@ -62,8 +62,12 @@ sub get {
@body = split(/\^\-\;/,$style{body});
$header = $session{setting}{docTypeDec}."\n".'<!-- WebGUI '.$WebGUI::VERSION.' --> <html> <head> <title>';
$header .= $session{page}{title}.' - '.$session{setting}{companyName};
$header .= '</title><link REL="icon" HREF="'.$session{config}{extrasURL}.'/favicon.png" TYPE="image/png">'
.$style{styleSheet}.$session{page}{metaTags};
my $type = lc($session{setting}{siteicon});
$type =~ s/.*\.(.*?)$/$1/;
$header .= '</title>
<link REL="icon" HREF="'.$session{setting}{siteicon}.'" TYPE="image/'.$type.'">
<LINK REL="SHORTCUT ICON" HREF="'.$session{setting}{favicon}.'">
'.$style{styleSheet}.$session{page}{metaTags};
if ($session{var}{adminOn}) {
# This "triple incantation" panders to the delicate tastes of various browsers for reliable cache suppression.
$header .= '<META HTTP-EQUIV="Pragma" CONTENT="no-cache">';