Bug 22127: Update date accessioned plugin - remove unused routine

Test plan:
1) Apply the patch
2) Have set dateaccessioned plugin to an item subfield (it is set on 952$d by default)
3) Confirm the functionality of this plugin is same as before patch

Signed-off-by: Michal Denar <black23@gmail.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
Josef Moravec 2019-01-14 11:27:32 +00:00 committed by Nick Clemens
parent d635827c54
commit 68fbc96218
1 changed files with 2 additions and 8 deletions

View File

@ -20,7 +20,6 @@
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
use C4::Biblio qw/GetMarcFromKohaField/;
use Koha::DateUtils;
my $builder = sub {
@ -29,12 +28,8 @@ my $builder = sub {
my $date = output_pref({ dt => dt_from_string, dateformat => 'iso', dateonly => 1 });
# find the tag/subfield mapped to items.dateaccessioned
my ($tag,$subfield) = GetMarcFromKohaField("items.dateaccessioned","");
my $res = <<END_OF_JS;
<script type="text/javascript">
//<![CDATA[
//
my $res = <<END_OF_JS;
<script>
// from: cataloguing/value_builder/dateaccessioned.pl
function Focus$function_name(event) {
@ -53,7 +48,6 @@ function set_to_today( id, force ) {
\$("#" + id).val("$date");
}
}
//]]>
</script>
END_OF_JS
return $res;