diff options
author | levinse <levinse> | 2011-06-16 04:25:34 +0000 |
---|---|---|
committer | levinse <levinse> | 2011-06-16 04:25:34 +0000 |
commit | 7e427310fba31d3d141ca05c5e251944a87b2a3b (patch) | |
tree | 3699adac14f2c1515401ebbfec1c10cf90713c9c | |
parent | 36c55a2f3ce37f44612ebe84128b9ffae4d5c847 (diff) |
L10N/DBI.pm: handle maketext exceptions properly, RT13258
-rw-r--r-- | FS/FS/L10N/DBI.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/FS/FS/L10N/DBI.pm b/FS/FS/L10N/DBI.pm index 2f01a6ad3..db387dba6 100644 --- a/FS/FS/L10N/DBI.pm +++ b/FS/FS/L10N/DBI.pm @@ -14,8 +14,14 @@ sub maketext { $Lexicon{$key} = FS::Msgcat::_gettext( $key, $lang ); } - $lh->SUPER::maketext($key, @rest); + my $res = eval { $lh->SUPER::maketext($key, @rest) }; + if ( !$res || $@ ) { + my $errmsg = "MT error for '$key'"; + warn "$errmsg\n"; + return $errmsg; + } + $res; } 1; |