Mercurial > pub > Impl

diff Lib/IMPL/Code/Loader.pm @ 278:4ddb27ff4a0b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
core refactoring
author cin
date Mon, 04 Feb 2013 02:10:37 +0400
parents 8d36073411b1
children
line wrap: on
line diff
--- a/Lib/IMPL/Code/Loader.pm	Fri Feb 01 16:37:59 2013 +0400
+++ b/Lib/IMPL/Code/Loader.pm	Mon Feb 04 02:10:37 2013 +0400
@@ -42,6 +42,7 @@
     if ($this->verifyNames) {
     	$package =~ m/^([a-zA-Z_0-9]+(?:::[a-zA-Z_0-9]+)*)$/
     	   or die ArgumentException->new(package => 'Invalid package name') ;
+    	$package = $1;
     }
     
     $package = $this->prefix . '::' . $package if $this->prefix;