| ... | ... |
@@ -1762,10 +1762,9 @@ sub _dec {
|
| 1762 | 1762 |
|
| 1763 | 1763 |
my $enc = $self->default_encoding; |
| 1764 | 1764 |
|
| 1765 |
- my $new_str; |
|
| 1766 |
- eval { $new_str = decode($enc, $str) };
|
|
| 1765 |
+ $str = decode($enc, $str); |
|
| 1767 | 1766 |
|
| 1768 |
- return $@ ? $str : $new_str; |
|
| 1767 |
+ return $str; |
|
| 1769 | 1768 |
} |
| 1770 | 1769 |
|
| 1771 | 1770 |
sub _enc {
|