Bugzilla – Attachment 186261 Details for
Bug 29980
Validate ISBN when cataloguing bibliographic records
Home
|
New
|
Browse
|
Search
|
[?]
|
Reports
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Bug 29980: [alternative patch] Add a cataloguing plugin to check ISBN
Bug-29980-alternative-patch-Add-a-cataloguing-plug.patch (text/plain), 2.78 KB, created by
Arthur Suzuki
on 2025-09-08 15:24:21 UTC
(
hide
)
Description:
Bug 29980: [alternative patch] Add a cataloguing plugin to check ISBN
Filename:
MIME Type:
Creator:
Arthur Suzuki
Created:
2025-09-08 15:24:21 UTC
Size:
2.78 KB
patch
obsolete
>From d1bb450ff69c021bf0cb65b538251470e424753a Mon Sep 17 00:00:00 2001 >From: Arthur Suzuki <arthur.suzuki@biblibre.com> >Date: Mon, 8 Sep 2025 15:14:47 +0000 >Subject: [PATCH] Bug 29980: [alternative patch] Add a cataloguing plugin to > check ISBN > >--- > cataloguing/value_builder/validate_isbn.pl | 69 ++++++++++++++++++++++ > 1 file changed, 69 insertions(+) > create mode 100644 cataloguing/value_builder/validate_isbn.pl > >diff --git a/cataloguing/value_builder/validate_isbn.pl b/cataloguing/value_builder/validate_isbn.pl >new file mode 100644 >index 00000000000..9f74c27eaaf >--- /dev/null >+++ b/cataloguing/value_builder/validate_isbn.pl >@@ -0,0 +1,69 @@ >+#!/usr/bin/perl >+ >+# Copyright 2025 BibLibre SARL >+# >+# This file is part of Koha. >+# >+# Koha is free software; you can redistribute it and/or modify it >+# under the terms of the GNU General Public License as published by >+# the Free Software Foundation; either version 3 of the License, or >+# (at your option) any later version. >+# >+# Koha is distributed in the hope that it will be useful, but >+# WITHOUT ANY WARRANTY; without even the implied warranty of >+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the >+# GNU General Public License for more details. >+# >+# You should have received a copy of the GNU General Public License >+# along with Koha; if not, see <http://www.gnu.org/licenses>. >+ >+use Modern::Perl; >+use CGI qw ( -utf8 ); >+ >+use C4::Auth qw( get_template_and_user ); >+use C4::Output qw( output_html_with_http_headers ); >+use Business::ISBN qw( valid_isbn_checksum ); >+ >+my $builder = sub { >+ my $params = shift; >+ my $id = $params->{id}; >+ >+ return qq| >+<script> >+function Blur$id(event) { >+ field = \$('#'+event.data.id); >+ isbn = field.val(); >+ var url = '../cataloguing/plugin_launcher.pl?plugin_name=validate_isbn.pl&isbn=' + isbn; >+ var req = \$.get(url); >+ req.done(function(resp){ >+ if ( resp != 1 ) { >+ field.addClass("subfield_not_filled"); >+ alert("Invalid ISBN : " + isbn); >+ return; >+ } >+ field.removeClass("subfield_not_filled"); >+ alert("Valid ISBN : " + isbn); >+ }); >+} >+</script>|; >+}; >+ >+my $launcher = sub { >+ my $params = shift; >+ my $cgi = $params->{cgi}; >+ my $isbn = $cgi->param('isbn'); >+ >+ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( >+ { >+ template_name => "cataloguing/value_builder/ajax.tt", >+ query => $cgi, >+ type => "intranet", >+ flagsrequired => { editcatalogue => '*' }, >+ } >+ ); >+ my $is_valid = valid_isbn_checksum($isbn); >+ $template->param( return => $is_valid ); >+ output_html_with_http_headers $cgi, $cookie, $template->output; >+}; >+ >+return { builder => $builder, launcher => $launcher }; >-- >2.39.5
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
|
Splinter Review
Attachments on
bug 29980
:
129984
|
129985
|
134432
|
134433
|
134434
|
186261
|
186509
|
186510
|
187583
|
187586
|
187709