diff Lib/IMPL/Serialization.pm @ 140:fb896377389f

to_json and escape_string functions for the templates minor changes
author wizard
date Mon, 05 Jul 2010 02:22:42 +0400
parents 5edc2ac5231c
children 4267a2ac3d46
line wrap: on
line diff
--- a/Lib/IMPL/Serialization.pm	Thu Jul 01 17:32:29 2010 +0400
+++ b/Lib/IMPL/Serialization.pm	Mon Jul 05 02:22:42 2010 +0400
@@ -368,7 +368,7 @@
       return $refSurogate;
     }
   } else {
-    eval "require $Type" unless _is_class($Type);
+    eval "require $Type; 1;" or warn $@ unless _is_class($Type);
     if ( $Type->UNIVERSAL::can('restore') ) {
       return $Type->restore($Data,$refSurogate);
     } else {