added ukrasi_array (split on , and " i ")

diff --git a/csv2js.pl b/csv2js.pl
index 76ac89f..4006be4 100755 (executable)
--- a/csv2js.pl
+++ b/csv2js.pl
@@ -9,6 +9,8 @@ use Data::Dump qw( dump );
 use JSON;
 use Clone qw( clone );
 
+use utf8;
+
 my $file = 'keramika.csv';
 my $aoh = csv (in => $file, headers => "auto");
 
@@ -25,6 +27,13 @@ foreach my $i ( @$aoh ) {
        $i->{thumbnail} = $thumb;
 #      $i->{label} = $i->{opis_predmeta};
        $i->{label} = $i->{ID};
+
+       my @ukrasi = split(/\s*,\s+|\s+i\s+/, $i->{ukras});
+       $i->{ukrasi_array} = [ @ukrasi ];
+
+       my @ocuvan = split(/\s*,\s+|\s+i\s+/, $i->{očuvan_dio_posude});
+       $i->{ocuvan_array} = [ @ocuvan ];
+
        warn "# i = ",dump($i);
        push @{ $json->{items} }, $i;
 #      foreach my $n ( 1 .. 1000 ) {

diff --git a/keramika.html b/keramika.html
index 106bd57..96a88c6 100644 (file)
--- a/keramika.html
+++ b/keramika.html
@@ -97,7 +97,7 @@
                         </div>
                     </td>
                     <td style="width:25%">
-                        <div data-ex-role="facet" data-ex-expression=".ukras" data-ex-facet-label="Ukras" data-ex-height="5em"></div>
+                        <div data-ex-role="facet" data-ex-expression=".ukrasi_array" data-ex-facet-label="Ukras" data-ex-height="5em"></div>
                         <div data-ex-role="facet" data-ex-expression=".tip" data-ex-facet-label="Tip" data-ex-height="10em"></div>
                     </td>
                 </tr>