return "data/word/org/$_[0]->{id}.jpg";
}},
convert => {-label => 'Convert options', -json => 'image', -multiple => 1, -src => sub {
- return "data/word/en/$_[0]->{id}.jpg";
+ return "data/word/32/$_[0]->{id}.jpg";
}},
+ crop32 => {-label => 'Crop 3:2', -json => 'image'},
story => {-label => 'Story', type => 'textarea', hidden => 'hidden'},
);
$reimage++ if $fields{rethumb}; # force refresh
if ($reimage) {
eval {
- $image->generate($wordcol{convert}->{-src}->($row), $imagecol->{convert});
+ $image->generate($wordcol{convert}->{-src}->($row), $imagecol);
} or do {
my ($warn, @details) = ref $@ ? @{$@} : $@;
Alert([ "Thumbnail image not generated", $warn ], @details);
printf '<span class=inline>';
print $row->input($col => $attr);
if (my $imgsrc = $attr->{-src}) {
- printf('<img id="%spreview" src="/%s" alt="%s"%s />',
+ printf('<span id="%spreview"><img src="/%s" alt="%s"%s /></span>',
$col, $_, $row->{form}, $col eq 'source' && ' hidden'
) for grep { -e } $imgsrc->($row);
}
<input type="submit" value="Add" />
</form></li>
</ul>
+
+<form id="search">
+ <input type="search" name="q" value="" placeholder="search" /><button type="submit">🔍</button>
+</form>
</section>
<:
}