Attachment 96789 Details for Bug 24330 – Bug 24330: When importing patrons from CSV, automatically strip BOM from file if it exists

[patch] Bug 24330: When importing patrons from CSV, automatically strip BOM from file if it exists

Bug-24330-When-importing-patrons-from-CSV-automati.patch (text/plain), 1.67 KB, created by David Nind on 2020-01-03 09:13:11 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: David Nind

Created: 2020-01-03 09:13:11 UTC

Size: 1.67 KB

patch

obsolete

>From de26a1c49a124e5f2a071fb41186d516d78433c9 Mon Sep 17 00:00:00 2001
>From: Kyle M Hall <kyle@bywatersolutions.com>
>Date: Thu, 2 Jan 2020 10:30:54 -0500
>Subject: [PATCH] Bug 24330: When importing patrons from CSV, automatically
> strip BOM from file if it exists
>
>We have a partner that exports UTF-8 CSV files, and is experiencing the same thing as the author of this article: https://www.freecodecamp.org/news/a-quick-tale-about-feff-the-invisible-character-cd25cd4630e7/
>
>In short, Excel is inserting an invisible UTF-8 character at the start of the file, so that the column name "cardnumber" is actually named "\x{feff}cardnumber", causing "cardnumber" to be blank.
>
>A simple solution is provided here: https://stackoverflow.com/questions/24390034/remove-bom-from-string-with-perl
>
>Test Plan:
>1) Download the example.csv file
>2) Attempt to import it using the patron import tool
>3) Note the invalid column name error
>4) Apply this patch, restart all the things!
>5) Attempt the import again
>6) Assuming you have a branchcode MPL and a cataegory code S, the patron should import!
>
>Signed-off-by: David Nind <david@davidnind.com>
>---
> Koha/Patrons/Import.pm | 1 +
> 1 file changed, 1 insertion(+)
>
>diff --git a/Koha/Patrons/Import.pm b/Koha/Patrons/Import.pm
>index cb3ba56134..f63d95e316 100644
>--- a/Koha/Patrons/Import.pm
>+++ b/Koha/Patrons/Import.pm
>@@ -404,6 +404,7 @@ sub prepare_columns {
>     foreach my $keycol (@csvcolumns) {
>         # columnkeys don't contain whitespace, but some stupid tools add it
>         $keycol =~ s/ +//g;
>+        $keycol =~ s/^\N{BOM}//; # Strip BOM if exists, otherwise it will be part of first column key
>         $params->{keycol}->{$keycol} = $col++;
>     }
> 
>-- 
>2.11.0

Actions: View | Diff | Splinter Review

Attachments on bug 24330: 96762 | 96763 | 96789 | 98156 | 98173