From: Stevan Little Date: Tue, 12 Sep 2006 14:17:33 +0000 (+0000) Subject: Class-MOP-Browser need to be a bulky Catalyst App, a single file script will suffice X-Git-Tag: 0_14~11 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f90dc7ee0efbd3812efacb72de3ad8b01bd6fa10;p=gitmo%2FMoose.git Class-MOP-Browser need to be a bulky Catalyst App, a single file script will suffice --- diff --git a/lib/Moose.pm b/lib/Moose.pm index 1290029..1ddde47 100644 --- a/lib/Moose.pm +++ b/lib/Moose.pm @@ -213,16 +213,16 @@ use Moose::Util::TypeConstraints; ## Utility functions sub _load_all_classes { - foreach my $super (@_) { + foreach my $class (@_) { # see if this is already # loaded in the symbol table - next if _is_class_already_loaded($super); + next if _is_class_already_loaded($class); # otherwise require it ... my $file = $class . '.pm'; $file =~ s{::}{/}g; eval { CORE::require($file) }; confess( - "Could not load module '$super' because : $@" + "Could not load module '$class' because : $@" ) if $@; } }