[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/opac opac-sendbasket.pl,1.2,1.3
From: |
Paul POULAIN |
Subject: |
[Koha-cvs] CVS: koha/opac opac-sendbasket.pl,1.2,1.3 |
Date: |
Mon, 22 Nov 2004 08:41:13 -0800 |
Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20979/opac
Modified Files:
opac-sendbasket.pl
Log Message:
fixing a problem in char encoding : translation of the send basket was erroneous
Index: opac-sendbasket.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-sendbasket.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** opac-sendbasket.pl 23 Jul 2004 16:06:00 -0000 1.2
--- opac-sendbasket.pl 22 Nov 2004 16:41:04 -0000 1.3
***************
*** 65,78 ****
# Analysing information and getting mail properties
! 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; }
my $email_file = "basket.txt";
! if ($template_res =~ /§FILENAME§\n(.*)\n§END_FILENAME§/s) { $email_file
= $1; }
! if ($template_res =~ /§MESSAGE§\n(.*)\n§END_MESSAGE§/s) { $mail{'body'}
= $1; }
my $boundary = "====" . time() . "====";
--- 65,78 ----
# Analysing information and getting mail properties
! 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; }
my $email_file = "basket.txt";
! if ($template_res =~ /<FILENAME>\n(.*)\n<END_FILENAME>/s) { $email_file
= $1; }
! if ($template_res =~ /<MESSAGE>\n(.*)\n<END_MESSAGE>/s) { $mail{'body'}
= $1; }
my $boundary = "====" . time() . "====";
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/opac opac-sendbasket.pl,1.2,1.3,
Paul POULAIN <=