diff Lib/IMPL/Resources.pm @ 378:2eed076cb944

rewritten IMPL::Resources::Strings + tests
author cin
date Wed, 15 Jan 2014 17:20:54 +0400
parents 39842eedd923
children
line wrap: on
line diff
--- a/Lib/IMPL/Resources.pm	Tue Jan 14 20:06:36 2014 +0400
+++ b/Lib/IMPL/Resources.pm	Wed Jan 15 17:20:54 2014 +0400
@@ -20,12 +20,9 @@
 
     local $CurrentLocale;
     $this->SetLocale($locale);    
-    eval {
-        &$code()
-            if $code;
-    };
-    die $@
-        if $@;
+    
+    &$code()
+		if $code;
 }
 
 1;