Created Codestriker topic at:
http://codestriker.sourceforge.net/cgi-bin/codestriker.pl?topic=2674987&action=view
User: sits
Date: 06/01/24 15:53:04
Modified: lib/Codestriker/Http Template.pm UrlBuilder.pm
Log:
Guard against configs which comment out variables, and for deployments with
IIS where HTTP_USER_AGENT is not defined
Index: Template.pm
===================================================================
RCS file: /cvsroot/codestriker/codestriker/lib/Codestriker/Http/Template.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -r1.14 -r1.15
--- Template.pm 23 May 2005 22:49:10 -0000 1.14
+++ Template.pm 24 Jan 2006 23:53:03 -0000 1.15
@@ -74,7 +74,8 @@
$vars->{'projects_enabled'} = Codestriker->projects_disabled() ? 0 : 1;
# Indicate if bug db integration is enabled.
- $vars->{'bugdb_enabled'} = ($Codestriker::bug_db ne "") ? 1 : 0;
+ $vars->{'bugdb_enabled'} =
+ (defined $Codestriker::bug_db && $Codestriker::bug_db ne "") ? 1 : 0;
# Indicate if antispam_email is enabled.
$vars->{'antispam_email'} = $Codestriker::antispam_email;
Index: UrlBuilder.pm
===================================================================
RCS file:
/cvsroot/codestriker/codestriker/lib/Codestriker/Http/UrlBuilder.pm,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -r1.27 -r1.28
--- UrlBuilder.pm 7 Jun 2005 22:51:46 -0000 1.27
+++ UrlBuilder.pm 24 Jan 2006 23:53:03 -0000 1.28
@@ -22,17 +22,20 @@
my $self = {};
$self->{query} = $query;
- # Determine what prefix is required wgen using relative URLs.
+ # Determine what prefix is required when using relative URLs.
# Unfortunately, Netcsape 4.x does things differently to everyone
# else.
my $browser = $ENV{'HTTP_USER_AGENT'};
- $self->{url_prefix} = ($browser =~ m%^Mozilla/(\d)% && $1 <= 4) ?
- $query->url(-relative=>1) : "";
+ $self->{url_prefix} = "";
+ if (defined $browser && $browser =~ m%^Mozilla/(\d)% && $1 <= 4) {
+ $self->{url_prefix} = $query->url(-relative=>1);
+ }
# Check if the HTML files are accessible vi another URL (required for
# sourceforge deployment). Check $Codestriker::codestriker_css.
my $htmlurl;
- if ($Codestriker::codestriker_css ne "") {
+ if (defined $Codestriker::codestriker_css &&
+ $Codestriker::codestriker_css ne "") {
$htmlurl = $Codestriker::codestriker_css;
$htmlurl =~ s/\/codestriker\.css//;
}
-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log files
for problems? Stop! Download the new AJAX search engine that makes
searching your log files as easy as surfing the web. DOWNLOAD SPLUNK!
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=103432&bid=230486&dat=121642
_______________________________________________
Codestriker-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/codestriker-commits
