word: identify thumbnail image files by id

[sheet.git] / writer.plp

diff --git a/writer.plp b/writer.plp
index 48ffd6748245eb97cef7245ae14695444eb9b35d..7cbe9e659b78d3e3b68f95fd8c4d7bcb9aa14941 100644 (file)
--- a/writer.plp
+++ b/writer.plp
@@ -300,7 +300,7 @@ package Shiar_Sheet::FormRow {
        sub imagepath {
                my ($row, $col) = @_;
                return "data/word/org/$row->{id}.jpg"   if $col eq 'source';
-               return "data/word/en/$row->{form}.jpg"  if $col eq 'thumb';
+               return "data/word/en/$row->{id}.jpg"  if $col eq 'thumb';
                return;
        }
 }