use $value and $count for facet eval

diff --git a/lib/MojoFacets/Data.pm b/lib/MojoFacets/Data.pm
index 6eb3a6e..0f894bd 100644 (file)
--- a/lib/MojoFacets/Data.pm
+++ b/lib/MojoFacets/Data.pm
@@ -953,8 +953,8 @@ sub facet {
 
        if ( my $code = $self->param('code') ) {
                my $out;
-               foreach my $v ( keys %$facet ) {
-                       my $c = $facet->{$v};
+               foreach my $value ( keys %$facet ) {
+                       my $count = $facet->{$value};
                        eval $code;
                        if ( $@ ) {
                                $out = $@;

diff --git a/public/code/Botanical references.botanical_references.pl b/public/code/Botanical references.botanical_references.pl
index 249314f..4fc2113 100644 (file)
--- a/public/code/Botanical references.botanical_references.pl
+++ b/public/code/Botanical references.botanical_references.pl
@@ -1,3 +1,4 @@
-foreach my $v ( @{ $row->{'Botanical references'} } ) {\r
- $row->{botanical_references} = [ split(/\s*,\s*/,$v) ]\r
-}
\ No newline at end of file
+foreach my $v ( @{ $row->{'Botanical references'} } ) {
+ $update->{botanical_references} = [ split(/\s*[,\.\s]\s*/,$v) ]
+}
+

diff --git a/templates/data/facet.html.ep b/templates/data/facet.html.ep
index 10cca77..689b4ad 100644 (file)
--- a/templates/data/facet.html.ep
+++ b/templates/data/facet.html.ep
@@ -60,8 +60,9 @@ First <a title="config MAX_FACETS" href="/config"><%= $max_facets %></a> shown
 % }
 <form method=post>
 <input type=hidden name=name value="<%= $name %>">
-Eval code on each facet value and count:
-<tt>$out->{sum} += $v * $c</tt><br>
+Eval code on each facet <tt>$value</tt> and <tt>$count</tt>
+<tt class=debug>$out->{sum} += $value * $count</tt>
+<br>
 <textarea name=code style="width: 100%">
 <%= param('code') %>
 </textarea>