Smarter loading of skins data

scc · Oct 20, 2004 · e145d81 · e145d81
1 parent e7b2cb1
commit e145d81
Showing 1 changed file with 10 additions and 1 deletion.
diff --git a/Slash/DB/MySQL/MySQL.pm b/Slash/DB/MySQL/MySQL.pm
@@ -10484,6 +10484,14 @@ sub getSkins {
 		my $url_skid   = $skins_ref->{$skid}{url}      ? $skid : $constants->{mainpage_skid};
 		my $color_skid = $colors->{$skid}              ? $skid : $constants->{mainpage_skid};
 
+		# Blank index_handler defaults to index.pl.
+		$skins_ref->{$skin}{index_handler} ||= 'index.pl';
+
+		# Adjust min and max and warn if wacky value.
+		$skins_ref->{$skin}{artcount_max} = $skins_ref->{$skin}{artcount_min}
+			if $skins_ref->{$skin}{artcount_max} < $skins_ref->{$skin}{artcount_min};
+		warn "skin $skid has artcount_max of 0" if !$skins_ref->{$skin}{artcount_max};
+
 		# Convert an index_handler of foo.pl to an index_static of
 		# foo.shtml, for convenience.
 		($skins_ref->{$skid}{index_static} = $skins_ref->{$skid}{index_handler}) =~ s/\.pl$/.shtml/;
@@ -10496,7 +10504,8 @@ sub getSkins {
 
 		$skins_ref->{$skid}{basedomain} = $skins_ref->{$host_skid}{hostname};
 
-		$skins_ref->{$skid}{absolutedir} = $skins_ref->{$url_skid}{url} || "http://$skins_ref->{$skid}{basedomain}";
+		$skins_ref->{$skid}{absolutedir} = $skins_ref->{$url_skid}{url}
+			|| "http://$skins_ref->{$skid}{basedomain}";
 		$skins_ref->{$skid}{absolutedir} =~ s{/+$}{};
 
 		my $rootdir_uri = URI->new($skins_ref->{$skid}{absolutedir});