From 09abaaac9eeba41552e4c2bb875e0d9cc1392169 Mon Sep 17 00:00:00 2001 From: Martin Renvoize Date: Fri, 15 Jul 2022 12:37:03 +0100 Subject: [PATCH] Bug 31162: Add a cataloging module home page This patch adds a new cataloging-home template and controller and replaces most cases of links to addbooks. This servers to provide a new cataloging home page for the cataloging module and keeps it distinct from the current addbooks page it partially replaces as a stating point for cataloging. --- cataloguing/cataloging-home.pl | 52 +++++++ .../prog/en/modules/cataloguing/addbiblio.tt | 4 +- .../prog/en/modules/cataloguing/addbooks.tt | 2 +- .../prog/en/modules/cataloguing/additem.tt | 2 +- .../en/modules/cataloguing/cataloging-home.tt | 144 ++++++++++++++++++ .../prog/en/modules/cataloguing/editor.tt | 2 +- .../prog/en/modules/cataloguing/linkitem.tt | 2 +- .../prog/en/modules/cataloguing/merge.tt | 2 +- .../prog/en/modules/intranet-main.tt | 2 +- 9 files changed, 204 insertions(+), 8 deletions(-) create mode 100755 cataloguing/cataloging-home.pl create mode 100644 koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/cataloging-home.tt diff --git a/cataloguing/cataloging-home.pl b/cataloguing/cataloging-home.pl new file mode 100755 index 0000000000..0796993e71 --- /dev/null +++ b/cataloguing/cataloging-home.pl @@ -0,0 +1,52 @@ +#!/usr/bin/perl + +# 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 . +# + +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 C4::Context; + +use Koha::BiblioFrameworks; +use Koha::Z3950Servers; + +my $query = CGI->new; +my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( + { + template_name => "cataloguing/cataloging-home.tt", + query => $query, + type => "intranet", + flagsrequired => { editcatalogue => '*' }, + } +); + +my $servers = Koha::Z3950Servers->search( + { + recordtype => 'biblio', + servertype => ['zed','sru'], + } +); + +my $frameworks = Koha::BiblioFrameworks->search({}, { order_by => ['frameworktext'] }); + +$template->param( + servers => $servers, + frameworks => $frameworks +); + +output_html_with_http_headers $query, $cookie, $template->output; diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/addbiblio.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/addbiblio.tt index cb6a16f905..bc9fd0fddf 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/addbiblio.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/addbiblio.tt @@ -794,7 +794,7 @@ function PopupMARCFieldDoc(field) { Home
  • - Cataloging + Cataloging
  • @@ -943,7 +943,7 @@ function PopupMARCFieldDoc(field) { [% ELSE %] [% END %]
    diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/addbooks.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/addbooks.tt index 126e49e524..fce568220a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/addbooks.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/addbooks.tt @@ -19,7 +19,7 @@
  • [% IF ( total || breeding_loop ) %]
  • - Cataloging + Cataloging
  • Search results diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/additem.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/additem.tt index 31eaf8e3bd..b965875227 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/additem.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/additem.tt @@ -38,7 +38,7 @@ Home
  • - Cataloging + Cataloging
  • Edit [% biblio.title | html %] [% IF ( biblio.author ) %] by [% biblio.author | html %][% END %] (Record #[% biblio.biblionumber | html %]) diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/cataloging-home.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/cataloging-home.tt new file mode 100644 index 0000000000..a04cbe8547 --- /dev/null +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/cataloging-home.tt @@ -0,0 +1,144 @@ +[% USE raw %] +[% USE Koha %] +[% USE Branches %] +[% INCLUDE 'doc-head-open.inc' %] +Cataloging › Koha +[% INCLUDE 'doc-head-close.inc' %] + + + + [% INCLUDE 'header.inc' %] + [% INCLUDE 'cataloging-search.inc' %] + + + +
    +
    +
    + [% IF ( CAN_user_editcatalogue_edit_catalogue ) %] +
    + [% IF Koha.Preference( 'EnableAdvancedCatalogingEditor' ) == 1 && CAN_user_editcatalogue_advanced_editor %] + Advanced editor + [% END %] +
    + + + +
    + [% IF servers.count > 0 %] +
    + + + +
    + [% END # /IF servers.count %] +
    + [% END # /IF CAN_user_editcatalogue_edit_catalogue %] + +

    Cataloging

    + +
    +
    +

    Import

    + + + +

    Export

    + + + +
    + +
    +

    Batch editing

    + + + +

    Automations

    + + +
    + + +
    + +
    +

    Reports

    + +
      + [% IF ( CAN_user_tools_inventory ) %] +
    • + Inventory +
    • + [% END %] +
    +
    +
    +
    +
    + +[% INCLUDE 'intranet-bottom.inc' %] diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/editor.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/editor.tt index ba6b88b95b..d5f2792a6e 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/editor.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/editor.tt @@ -24,7 +24,7 @@ Home
  • - Cataloging + Cataloging
  • diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/linkitem.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/linkitem.tt index 4b868268f6..869ca09404 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/linkitem.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/linkitem.tt @@ -12,7 +12,7 @@ Home
  • - Cataloging + Cataloging
  • diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/merge.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/merge.tt index 84305e7b8a..3f8881c8cb 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/merge.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/merge.tt @@ -24,7 +24,7 @@ div#result { margin-top: 1em; } Home
  • - Cataloging + Cataloging
  • diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt index 1b556f379b..fd2855188a 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/intranet-main.tt @@ -120,7 +120,7 @@ [% IF ( CAN_user_editcatalogue_edit_catalogue || CAN_user_editcatalogue_edit_items ) %]
  • - Cataloging + Cataloging
  • [% END %] -- 2.20.1