Attachment 106892 Details for Bug 25709 – Bug 25709: Rename systempreference to NotesToHide

[patch] Bug 25709: Rename systempreference to NotesToHide

Bug-25709-Rename-systempreference-to-NotesToHide.patch (text/plain), 5.20 KB, created by Katrin Fischer on 2020-07-15 06:11:03 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Katrin Fischer

Created: 2020-07-15 06:11:03 UTC

Size: 5.20 KB

patch

obsolete

>From 4e5e0d89753d74b31e8d68a90065082a47ed5791 Mon Sep 17 00:00:00 2001
>From: Nick Clemens <nick@bywatersolutions.com>
>Date: Mon, 6 Jul 2020 17:56:35 +0000
>Subject: [PATCH] Bug 25709: Rename systempreference to NotesToHide
>
>To test:
>1 - Apply patch and updatedatabase
>2 - git grep NotesBlacklist
>3 - Note all remaining occurrences are translations, db updates, and release notes
>4 - Add a field (e.g. '520' ) to the NotesToHide systempreference
>5 - View a record with a 520 field on the opac
>6 - Confirm the field does not show in the 'Title notes' tab
>
>Signed-off-by: Owen Leonard <oleonard@myacpl.org>
>
>Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
>---
> C4/Biblio.pm                                                        | 6 +++---
> .../data/mysql/atomicupdate/rename_preference_NotesToHide.perl      | 5 +++++
> installer/data/mysql/sysprefs.sql                                   | 2 +-
> .../prog/en/modules/admin/preferences/cataloguing.pref              | 2 +-
> t/Biblio/GetMarcNotes.t                                             | 4 ++--
> 5 files changed, 12 insertions(+), 7 deletions(-)
> create mode 100644 installer/data/mysql/atomicupdate/rename_preference_NotesToHide.perl
>
>diff --git a/C4/Biblio.pm b/C4/Biblio.pm
>index 0e0a30936b..41bdcc504a 100644
>--- a/C4/Biblio.pm
>+++ b/C4/Biblio.pm
>@@ -1513,11 +1513,11 @@ sub GetMarcNotes {
>         590 => 1
>     );
> 
>-    my %blacklist = map { $_ => 1 }
>-        split( /,/, C4::Context->preference('NotesBlacklist'));
>+    my %hiddenlist = map { $_ => 1 }
>+        split( /,/, C4::Context->preference('NotesToHide'));
>     foreach my $field ( $record->field($scope) ) {
>         my $tag = $field->tag();
>-        next if $blacklist{ $tag };
>+        next if $hiddenlist{ $tag };
>         next if $opac && $maybe_private{$tag} && !$field->indicator(1);
>         if( $marcflavour ne 'UNIMARC' && $field->subfield('u') ) {
>             # Field 5XX$u always contains URI
>diff --git a/installer/data/mysql/atomicupdate/rename_preference_NotesToHide.perl b/installer/data/mysql/atomicupdate/rename_preference_NotesToHide.perl
>new file mode 100644
>index 0000000000..90a4e730ec
>--- /dev/null
>+++ b/installer/data/mysql/atomicupdate/rename_preference_NotesToHide.perl
>@@ -0,0 +1,5 @@
>+$DBversion = 'XXX'; # will be replaced by the RM
>+if( CheckVersion( $DBversion ) ) {
>+    $dbh->do( "UPDATE systempreferences SET variable='NotesToHide' WHERE variable = 'NotesBlacklist'" );
>+    NewVersion( $DBversion, 25709, "Rename systempreference to NotesToHide");
>+}
>diff --git a/installer/data/mysql/sysprefs.sql b/installer/data/mysql/sysprefs.sql
>index d67a02b367..6f9cb69247 100644
>--- a/installer/data/mysql/sysprefs.sql
>+++ b/installer/data/mysql/sysprefs.sql
>@@ -333,7 +333,7 @@ INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `
> ('NoIssuesChargeGuarantees','','','Define maximum amount withstanding before check outs are blocked','Integer'),
> ('noItemTypeImages','0',NULL,'If ON, disables itemtype images in the staff interface','YesNo'),
> ('NoRenewalBeforePrecision','exact_time','date|exact_time','Calculate "No renewal before" based on date only or exact time of due date','Choice'),
>-('NotesBlacklist','',NULL,'List of notes fields that should not appear in the title notes/description separator of details','free'),
>+('NotesToHide','',NULL,'List of notes fields that should not appear in the title notes/description separator of details','free'),
> ('NotHighlightedWords','and|or|not',NULL,'List of words to NOT highlight when OpacHitHighlight is enabled','free'),
> ('NoticeBcc','','','Email address to bcc outgoing notices sent by email','free'),
> ('NoticeCSS','',NULL,'Notices CSS url.','free'),
>diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref
>index 475decfa4e..343665c18e 100644
>--- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref
>+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/cataloguing.pref
>@@ -230,7 +230,7 @@ Cataloging:
>             - "is the logged in user's library. The second tab will contain all other items."
>         -
>             - "Don't show"
>-            - pref: NotesBlacklist
>+            - pref: NotesToHide
>               class: multi
>             - "note fields in the 'Title notes' tab and in the 'Description' tab on the OPAC and staff interface detail pages. Use a comma to separate multiple fields. Examples: 500,502 (MARC21); 300,328 (UNIMARC)."
>             - <br />
>diff --git a/t/Biblio/GetMarcNotes.t b/t/Biblio/GetMarcNotes.t
>index bb55226bdc..ccd368d346 100755
>--- a/t/Biblio/GetMarcNotes.t
>+++ b/t/Biblio/GetMarcNotes.t
>@@ -27,7 +27,7 @@ use C4::Biblio;
> 
> subtest 'GetMarcNotes MARC21' => sub {
>     plan tests => 11;
>-    t::lib::Mocks::mock_preference( 'NotesBlacklist', '520' );
>+    t::lib::Mocks::mock_preference( 'NotesToHide', '520' );
> 
>     my $record = MARC::Record->new;
>     $record->append_fields(
>@@ -55,7 +55,7 @@ subtest 'GetMarcNotes MARC21' => sub {
> 
> subtest 'GetMarcNotes UNIMARC' => sub {
>     plan tests => 3;
>-    t::lib::Mocks::mock_preference( 'NotesBlacklist', '310' );
>+    t::lib::Mocks::mock_preference( 'NotesToHide', '310' );
> 
>     my $record = MARC::Record->new;
>     $record->append_fields(
>-- 
>2.11.0

Actions: View | Diff | Splinter Review

Attachments on bug 25709: 105701 | 105702 | 106601 | 106625 | 106632 | 106892 | 107439