Attachment 98976 Details for Bug 24480 – Bug 24480: Unit test

[patch] Bug 24480: Unit test

Bug-24480-Unit-test.patch (text/plain), 2.75 KB, created by ByWater Sandboxes on 2020-02-14 16:39:03 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: ByWater Sandboxes

Created: 2020-02-14 16:39:03 UTC

Size: 2.75 KB

patch

obsolete

>From 6fd3271990f0933c579d0f7d600212fb84fd1ed8 Mon Sep 17 00:00:00 2001
>From: Arthur Suzuki <arthur.suzuki@biblibre.com>
>Date: Sat, 25 Jan 2020 23:19:52 +0100
>Subject: [PATCH] Bug 24480: Unit test
>
>Signed-off-by: Kelly <kelly@bywatersolutions.com>
>---
> t/db_dependent/MarcModificationTemplates.t | 40 +++++++++++++++---------------
> 1 file changed, 20 insertions(+), 20 deletions(-)
>
>diff --git a/t/db_dependent/MarcModificationTemplates.t b/t/db_dependent/MarcModificationTemplates.t
>index f9628d7f2b..212a768f69 100644
>--- a/t/db_dependent/MarcModificationTemplates.t
>+++ b/t/db_dependent/MarcModificationTemplates.t
>@@ -461,6 +461,9 @@ sub expected_record_1 {
>     $record->leader('03174nam a2200445 a 4500');
>     my @fields = (
>         MARC::Field->new(
>+           '007', 'vxcdq',
>+        ),
>+        MARC::Field->new(
>             100, '1', ' ',
>             a => 'Knuth, Donald Ervin',
>             d => '1938',
>@@ -471,35 +474,32 @@ sub expected_record_1 {
>             c => 'Donald E. Knuth.',
>         ),
>         MARC::Field->new(
>-            650, ' ', '0',
>-            9 => '462',
>-        ),
>-        MARC::Field->new(
>-            952, ' ', ' ',
>-            p => '3010023917_updated',
>-            y => 'BK',
>-            c => 'GEN',
>-            e => '2001-06-25',
>-        ),
>-        MARC::Field->new(
>             246, '', ' ',
>             a => 'The art of computer programming',
>         ),
>         MARC::Field->new(
>+            650, ' ', '0',
>+            9 => '462',
>+        ),
>+        MARC::Field->new(
>             651, ' ', '0',
>             a => 'Computer algorithms.',
>             9 => '499',
>         ),
>         MARC::Field->new(
>-            999, ' ', ' ',
>-            a => 'existent - updated.',
>+            952, ' ', ' ',
>+            p => '3010023917_updated',
>+            y => 'BK',
>+            c => 'GEN',
>+            e => '2001-06-25',
>         ),
>         MARC::Field->new(
>             999, ' ', ' ',
>             a => 'additional existent.',
>         ),
>         MARC::Field->new(
>-           '007', 'vxcdq',
>+            999, ' ', ' ',
>+            a => 'existent - updated.',
>         ),
>     );
>     $record->append_fields(@fields);
>@@ -531,17 +531,17 @@ sub expected_record_2 {
>             9 => '499',
>         ),
>         MARC::Field->new(
>+            651, ' ', '0',
>+            a => 'Computer programming.',
>+            9 => '462',
>+        ),
>+        MARC::Field->new(
>             952, ' ', ' ',
>             p => '3010023917',
>             y => 'BK',
>             c => 'GEN',
>             d => '2001-06-25',
>-        ),
>-        MARC::Field->new(
>-            651, ' ', '0',
>-            a => 'Computer programming.',
>-            9 => '462',
>-        ),
>+        )
>     );
>     $record->append_fields(@fields);
>     return $record;
>-- 
>2.11.0

Actions: View | Diff | Splinter Review

Attachments on bug 24480: 97695 | 97944 | 97945 | 98975 | 98976 | 106621 | 112311 | 112312 | 150665 | 150666 | 155714 | 155715 | 155716 | 155717 | 155721 | 155722 | 155723 | 155724 | 158130 | 158131 | 158132 | 158133