Mercurial > pub > Impl

diff Lib/IMPL/Serialization.pm @ 207:f534a60d5b01

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
minor changes
author sergey
date Fri, 04 May 2012 02:09:13 +0400
parents 5146e17a7b76
children c477f24f1980
line wrap: on
line diff
--- a/Lib/IMPL/Serialization.pm	Thu May 03 16:48:39 2012 +0400
+++ b/Lib/IMPL/Serialization.pm	Fri May 04 02:09:13 2012 +0400
@@ -284,9 +284,9 @@
 	sub _load_class {
 		return if $classes{$_[0]};
 		
-		die new IMPL::Exception("Invalid class name",$_[0]) unless $_[0] =~ m/^\w+(\:\:\w+)*$/;
+		die new IMPL::Exception("Invalid class name",$_[0]) unless $_[0] =~ m/^(\w+(?:\:\:\w+)*)$/;
 		
-		eval "require $_[0]";
+		eval "require $1";
 		$classes{$_[0]} = 1;
 	}
 }