Attachment 64571 Details for Bug 18811 – Bug 18811: Add Koha Objects for authority tags and subfields

[patch] Bug 18811: Add Koha Objects for authority tags and subfields

Bug-18811-Add-Koha-Objects-for-authority-tags-and-.patch (text/plain), 5.77 KB, created by Marcel de Rooy on 2017-06-23 06:02:03 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Marcel de Rooy

Created: 2017-06-23 06:02:03 UTC

Size: 5.77 KB

patch

obsolete

>From 89e3c1b67f771ee2207d7cab10b607508dbd6a48 Mon Sep 17 00:00:00 2001
>From: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
>Date: Thu, 22 Jun 2017 13:42:38 +0200
>Subject: [PATCH] Bug 18811: Add Koha Objects for authority tags and subfields
>Content-Type: text/plain; charset=utf-8
>
>Trivial copy and paste activity.
>Will be used in a later patch.
>
>No test plan needed.
>
>Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
>---
> Koha/Authority/Subfield.pm  | 40 +++++++++++++++++++++++++++++++++++++++
> Koha/Authority/Subfields.pm | 46 +++++++++++++++++++++++++++++++++++++++++++++
> Koha/Authority/Tag.pm       | 40 +++++++++++++++++++++++++++++++++++++++
> Koha/Authority/Tags.pm      | 46 +++++++++++++++++++++++++++++++++++++++++++++
> 4 files changed, 172 insertions(+)
> create mode 100644 Koha/Authority/Subfield.pm
> create mode 100644 Koha/Authority/Subfields.pm
> create mode 100644 Koha/Authority/Tag.pm
> create mode 100644 Koha/Authority/Tags.pm
>
>diff --git a/Koha/Authority/Subfield.pm b/Koha/Authority/Subfield.pm
>new file mode 100644
>index 0000000..11927ea
>--- /dev/null
>+++ b/Koha/Authority/Subfield.pm
>@@ -0,0 +1,40 @@
>+package Koha::Authority::Subfield;
>+
>+# 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, write to the Free Software Foundation, Inc.,
>+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
>+
>+use Modern::Perl;
>+
>+use base qw(Koha::Object);
>+
>+=head1 NAME
>+
>+Koha::Authority::Subfield - Koha Authority Subfield Object class
>+
>+=head1 API
>+
>+=head2 Class Methods
>+
>+=cut
>+
>+=head3 type
>+
>+=cut
>+
>+sub _type {
>+    return 'AuthSubfieldStructure';
>+}
>+
>+1;
>diff --git a/Koha/Authority/Subfields.pm b/Koha/Authority/Subfields.pm
>new file mode 100644
>index 0000000..121b795
>--- /dev/null
>+++ b/Koha/Authority/Subfields.pm
>@@ -0,0 +1,46 @@
>+package Koha::Authority::Subfields;
>+
>+# 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, write to the Free Software Foundation, Inc.,
>+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
>+
>+use Modern::Perl;
>+
>+use Koha::Authority::Subfield;
>+
>+use base qw(Koha::Objects);
>+
>+=head1 NAME
>+
>+Koha::Authority::Subfields - Koha Authority Subfield Object set class
>+
>+=head1 API
>+
>+=head2 Class Methods
>+
>+=cut
>+
>+=head3 type
>+
>+=cut
>+
>+sub _type {
>+    return 'AuthSubfieldStructure';
>+}
>+
>+sub object_class {
>+    return 'Koha::Authority::Subfield';
>+}
>+
>+1;
>diff --git a/Koha/Authority/Tag.pm b/Koha/Authority/Tag.pm
>new file mode 100644
>index 0000000..2b4a30d
>--- /dev/null
>+++ b/Koha/Authority/Tag.pm
>@@ -0,0 +1,40 @@
>+package Koha::Authority::Tag;
>+
>+# 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, write to the Free Software Foundation, Inc.,
>+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
>+
>+use Modern::Perl;
>+
>+use base qw(Koha::Object);
>+
>+=head1 NAME
>+
>+Koha::Authority::Tag - Koha Authority Tag Object class
>+
>+=head1 API
>+
>+=head2 Class Methods
>+
>+=cut
>+
>+=head3 type
>+
>+=cut
>+
>+sub _type {
>+    return 'AuthTagStructure';
>+}
>+
>+1;
>diff --git a/Koha/Authority/Tags.pm b/Koha/Authority/Tags.pm
>new file mode 100644
>index 0000000..a621071
>--- /dev/null
>+++ b/Koha/Authority/Tags.pm
>@@ -0,0 +1,46 @@
>+package Koha::Authority::Tags;
>+
>+# 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, write to the Free Software Foundation, Inc.,
>+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
>+
>+use Modern::Perl;
>+
>+use Koha::Authority::Tag;
>+
>+use base qw(Koha::Objects);
>+
>+=head1 NAME
>+
>+Koha::Authority::Tags - Koha Authority Tag Object set class
>+
>+=head1 API
>+
>+=head2 Class Methods
>+
>+=cut
>+
>+=head3 type
>+
>+=cut
>+
>+sub _type {
>+    return 'AuthTagStructure';
>+}
>+
>+sub object_class {
>+    return 'Koha::Authority::Tag';
>+}
>+
>+1;
>-- 
>2.1.4

Actions: View | Diff | Splinter Review

Attachments on bug 18811: 64314 | 64541 | 64542 | 64570 | 64571 | 64572 | 64573 | 66309 | 66310 | 66311 | 66312 | 66708 | 66709 | 66710 | 66711 | 66793 | 66794 | 70614