X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/50442220cc52bad55c1003de34f8dada958650d5..2d689f2ba483997f2fad02fddf99b701f88b9f9a:/word.plp diff --git a/word.plp b/word.plp index f47c4f4..977545f 100644 --- a/word.plp +++ b/word.plp @@ -14,7 +14,7 @@ if ($Request and $Request =~ m{\A([^/]+)}) { } my $wordlist = "$wordlistbase.inc.pl"; -my $limit = $get{v} // (exists $get{v} ? 4 : 3); +my $limit = $get{v} // (exists $get{v} ? 5 : 3); Html({ title => 'words cheat sheet', @@ -24,7 +24,7 @@ Html({ language '], data => [$wordlist], - raw => (exists $get{q} && <<'EOT') + raw => exists $get{q} ? <<'EOT' : undef, -EOT - . <<'EOT', - EOT }); @@ -82,7 +75,7 @@ sub showimg { $name = "$name" if $name =~ s/\?$//; $name = "
$name
"; - if ($id and -e (my $img = "data/word/en/$id.jpg")) { + if ($id and -e (my $img = "data/word/32/$id.jpg")) { $name .= sprintf '%s', $img, $imgname; } return sprintf '%s', $hidden && !exists $get{v} && ' hidden', $name;