fixing a problem in char encoding : translation of the send basket was erroneous

diff --git a/koha-tmpl/opac-tmpl/css/en/opac-sendbasket.tmpl b/koha-tmpl/opac-tmpl/css/en/opac-sendbasket.tmpl
index dd60090..996520e 100644 (file)
--- a/koha-tmpl/opac-tmpl/css/en/opac-sendbasket.tmpl
+++ b/koha-tmpl/opac-tmpl/css/en/opac-sendbasket.tmpl
@@ -1,17 +1,17 @@
-§SUBJECT§
+<SUBJECT>
 Your biblio basket
-§END_SUBJECT§
+<END_SUBJECT>
 
-§HEADER§
+<HEADER>
 Hi,
 Here is your biblio basket...
-§END_HEADER§
+<END_HEADER>
 
-§FILENAME§
+<FILENAME>
 basket.txt
-§END_FILENAME§
+<END_FILENAME>
 
-§MESSAGE§
+<MESSAGE>
 ---------------------------------------------
 <!-- TMPL_LOOP NAME="BIBLIO_RESULTS" --><!-- TMPL_VAR NAME="title" -->(record <!-- TMPL_VAR NAME="biblionumber" -->)<!-- TMPL_IF name="isbn" -->
 ISBN:          <!-- TMPL_VAR NAME="ISBN" --><!-- /TMPL_IF --><!-- TMPL_IF name="subtitle" -->
@@ -31,4 +31,4 @@ LCCN:         <!-- TMPL_VAR name="lccn" --><!-- /TMPL_IF --><!-- TMPL_IF name="url" -->
 URL :          <!-- TMPL_VAR NAME="url" --><!-- /TMPL_IF -->
 ---------------------------------------------
 <!-- /TMPL_LOOP -->
-§END_MESSAGE§
+<END_MESSAGE>

diff --git a/opac/opac-sendbasket.pl b/opac/opac-sendbasket.pl
index 07e503f..ca678e5 100755 (executable)
--- a/opac/opac-sendbasket.pl
+++ b/opac/opac-sendbasket.pl
@@ -64,16 +64,16 @@ if ($email_add) {
        my $template_res = $template2->output();
 
        # Analysing information and getting mail properties
-       if ($template_res =~ /§SUBJECT§\n(.*)\n§END_SUBJECT§/s) { $mail{'subject'} = $1; }
+       if ($template_res =~ /<SUBJECT>\n(.*)\n<END_SUBJECT>/s) { $mail{'subject'} = $1; }
        else { $mail{'subject'} = "no subject"; }
 
        my $email_header = "";
-       if ($template_res =~ /§HEADER§\n(.*)\n§END_HEADER§/s) { $email_header = $1; }
+       if ($template_res =~ /<HEADER>\n(.*)\n<END_HEADER>/s) { $email_header = $1; }
 
        my $email_file = "basket.txt";
-       if ($template_res =~ /§FILENAME§\n(.*)\n§END_FILENAME§/s) { $email_file = $1; }
+       if ($template_res =~ /<FILENAME>\n(.*)\n<END_FILENAME>/s) { $email_file = $1; }
 
-       if ($template_res =~ /§MESSAGE§\n(.*)\n§END_MESSAGE§/s) { $mail{'body'} = $1; }
+       if ($template_res =~ /<MESSAGE>\n(.*)\n<END_MESSAGE>/s) { $mail{'body'} = $1; }
 
        my $boundary = "====" . time() . "====";
        $mail{'content-type'} = "multipart/mixed; boundary=\"$boundary\"";