View | Details | Raw Unified | Return to bug 21874
Collapse All | Expand All

(-)a/basket/sendbasket.pl (+1 lines)
Lines 112-117 if ( $email_add ) { Link Here
112
    if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) {
112
    if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) {
113
        $mail{subject} = $1;
113
        $mail{subject} = $1;
114
        $mail{subject} =~ s|\n?(.*)\n?|$1|;
114
        $mail{subject} =~ s|\n?(.*)\n?|$1|;
115
        $mail{subject} = encode('MIME-Header',$mail{subject});
115
        $mail{subject} = Encode::encode("UTF-8", $mail{subject});
116
        $mail{subject} = Encode::encode("UTF-8", $mail{subject});
116
    }
117
    }
117
    else { $mail{'subject'} = "no subject"; }
118
    else { $mail{'subject'} = "no subject"; }
(-)a/opac/opac-sendbasket.pl (+1 lines)
Lines 133-138 if ( $email_add ) { Link Here
133
    if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) {
133
    if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) {
134
        $mail{subject} = $1;
134
        $mail{subject} = $1;
135
        $mail{subject} =~ s|\n?(.*)\n?|$1|;
135
        $mail{subject} =~ s|\n?(.*)\n?|$1|;
136
        $mail{subject} = encode('MIME-Header',$mail{subject});
136
        $mail{subject} = Encode::encode("UTF-8", $mail{subject});
137
        $mail{subject} = Encode::encode("UTF-8", $mail{subject});
137
    }
138
    }
138
    else { $mail{'subject'} = "no subject"; }
139
    else { $mail{'subject'} = "no subject"; }
(-)a/opac/opac-sendshelf.pl (+1 lines)
Lines 136-141 if ( $email ) { Link Here
136
        $mail{subject} =~ s|\n?(.*)\n?|$1|;
136
        $mail{subject} =~ s|\n?(.*)\n?|$1|;
137
    }
137
    }
138
    else { $mail{'subject'} = "no subject"; }
138
    else { $mail{'subject'} = "no subject"; }
139
    $mail{subject} = encode('MIME-Header',$mail{subject});
139
    $mail{subject} = Encode::encode("UTF-8", $mail{subject});
140
    $mail{subject} = Encode::encode("UTF-8", $mail{subject});
140
141
141
    my $email_header = "";
142
    my $email_header = "";
(-)a/virtualshelves/sendshelf.pl (-2 / +2 lines)
Lines 113-119 if ($email) { Link Here
113
113
114
    # Analysing information and getting mail properties
114
    # Analysing information and getting mail properties
115
    if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) {
115
    if ( $template_res =~ /<SUBJECT>(.*)<END_SUBJECT>/s ) {
116
        $mail{'subject'} = Encode::encode("UTF-8", $1);
116
		$mail{'subject'} = encode('MIME-Header',$1);
117
        $mail{'subject'} = Encode::encode("UTF-8", $mail{'subject'});
117
        $mail{subject} =~ s|\n?(.*)\n?|$1|;
118
        $mail{subject} =~ s|\n?(.*)\n?|$1|;
118
    }
119
    }
119
    else { $mail{'subject'} = "no subject"; }
120
    else { $mail{'subject'} = "no subject"; }
120
- 

Return to bug 21874