Bug 32830: Fix cataloguing/value_builder/unimarc_field_116.pl

[srvgit] / cataloguing / value_builder / stocknumberam123.pl

diff --git a/cataloguing/value_builder/stocknumberam123.pl b/cataloguing/value_builder/stocknumberam123.pl
index be36fe2..05565fe 100755 (executable)
--- a/cataloguing/value_builder/stocknumberam123.pl
+++ b/cataloguing/value_builder/stocknumberam123.pl
@@ -22,9 +22,9 @@
 use Modern::Perl;
 use CGI qw ( -utf8 );
 
-use C4::Auth;
+use C4::Auth qw( get_template_and_user );
 use C4::Context;
-use C4::Output;
+use C4::Output qw( output_html_with_http_headers );
 
 =head1 DESCRIPTION
 
@@ -44,8 +44,8 @@ my $builder = sub {
     my ( $params ) = @_;
     my $res="
     <script>
-        function Blur$params->{id}() {
-                var code = document.getElementById('$params->{id}');
+        function Blur$params->{id}(ev) {
+                var code = document.getElementById(ev.data.id);
                 var url = '../cataloguing/plugin_launcher.pl?plugin_name=stocknumberam123.pl&code=' + code.value;
                 var req = \$.get(url);
                 req.done(function(resp){