--- ext/Encode/lib/Encode/MIME/Header.pm~ 2003-05-09 11:35:00.000000000 +0100 +++ ext/Encode/lib/Encode/MIME/Header.pm 2003-05-09 11:36:15.000000000 +0100 @@ -72,7 +72,7 @@ sub decode_b{ my $enc = shift; - my $d = find_encoding($enc) or croak(Unknown encoding "$enc"); + my $d = find_encoding($enc) or croak qq(Unknown encoding "$enc"); my $db64 = decode_base64(shift); return $d->name eq 'utf8' ? Encode::decode_utf8($db64) : $d->decode($db64, Encode::FB_PERLQQ); @@ -80,7 +80,7 @@ sub decode_q{ my ($enc, $q) = @_; - my $d = find_encoding($enc) or croak(Unknown encoding "$enc"); + my $d = find_encoding($enc) or croak qq(Unknown encoding "$enc"); $q =~ s/_/ /go; $q =~ s/=([0-9A-Fa-f]{2})/pack("C", hex($1))/ego; return $d->name eq 'utf8' ? -- "If there were an invisible cat in that chair, it would look empty. But it does look empty; therefore there is an invisible cat in it". Belief in invisible cats cannot perhaps be logically disproved, but it tells us a good deal about those who hold it. - C S Lewis, "The Four Loves"Thread Next