X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/0b686d7436dbdb50f0bf8547f845af6bc334a9e4..b274dda92ace617497bf5866832b46629ba79209:/sc.plp diff --git a/sc.plp b/sc.plp index d6ccaf6..26c8a97 100644 --- a/sc.plp +++ b/sc.plp @@ -1,5 +1,10 @@ <(common.inc.plp)><: +my $datafile = 'sc-units.inc.pl'; +if ($ENV{PATH_INFO} and $ENV{PATH_INFO} eq '/2') { + $datafile = 'sc2-units.inc.pl'; +} + Html({ title => 'starcraft unit cheat sheet', version => 'v1.0', @@ -13,6 +18,7 @@ Html({ reference software attributes properties '], stylesheet => [qw'light'], + data => [$datafile], }); :> @@ -253,7 +259,7 @@ sub showrange { } @$specials; } - my $units = do 'sc-units.inc.pl'; + my $units = do $datafile; die "Cannot open unit data: $_\n" for $@ || $! || (); my $grouped = !exists $get{order}; if (exists $get{order}) {