select {
padding: .3rem .2rem; /* TODO: input */
}
-form > ul li img {
- max-width: 300px;
-}
ul.popup {
display: flex;
my @wordcols = (
lang => 'Language',
cat => 'Category',
+ ref => undef, # included with cat
+ prio => 'Level',
+ cover => undef, # included with prio
form => 'Translation',
alt => 'Synonyms',
wptitle => 'Wikipedia',
- source => 'Image URL',
+ source => 'Image',
thumb => 'Convert options',
- prio => 'Level',
- cover => undef, # included with prio
- ref => 'Reference',
);
my @prioenum = qw( essential basic common distinctive rare invisible );
my ($find) = map {{id => $_}} $fields{id} || $Request || ();
}
else {
printf '<input id="%s" name="%1$s" value="%s" />', $col, Entity($val);
- -e and printf '<img src="/%s" alt="%s" />', $_, $row->{form} for
- $col eq 'source' ? "data/word/org/$row->{id}.jpg" :
- $col eq 'thumb' ? "data/word/eng/$row->{form}.jpg" :
- ();
+ -e and printf '<img src="/%s" alt="%s" />', $_, $row->{form}
+ for $col eq 'thumb' ? "data/word/eng/$row->{form}.jpg" : ();
+ printf('<label for="%s">%s</label><input id="%1$s" name="%1$s" value="%s" />',
+ 'ref', 'Reference', Entity($row->{ref})
+ ) if $col eq 'cat';
}
print '</span>';
+ -e and printf('<img id="%spreview" src="/%s" alt="%s" hidden />',
+ $col, $_, $row->{form}
+ ) for $col eq 'source' ? "data/word/org/$row->{id}.jpg" : ();
say '</p></li>';
}
:>