X-Git-Url: https://git.donarmstrong.com/?p=class_modular.git%2F.git;a=blobdiff_plain;f=lib%2FClass%2FModular.pm;h=ec58bb485837789ca50dbfc0c0b895df83c098ba;hp=c3f1c0afb49752dd9947efc0775e335cf59fa481;hb=HEAD;hpb=f2d29bbeee0600103a8402e74476652e6998af50

diff --git a/lib/Class/Modular.pm b/lib/Class/Modular.pm
index c3f1c0a..ec58bb4 100644
--- a/lib/Class/Modular.pm
+++ b/lib/Class/Modular.pm
@@ -72,7 +72,7 @@ use Storable qw(dclone); # Used for deep copying objects
 use Safe; # Use Safe when we are dealing with coderefs
 
 BEGIN{
-     $VERSION = q$0.04SVN$;
+     $VERSION = q$0.06SVN$;
      ($REVISION) = q$LastChangedRevision$ =~ /\$LastChangedRevision:\s+([^\s+])/;
      $DEBUG = 0 unless defined $DEBUG;
      $USE_SAFE = 1 unless defined $USE_SAFE;
@@ -465,9 +465,9 @@ sub AUTOLOAD{
 
      if (exists $self->{$cm}{_methodhash}{$method} and
 	 defined $self->{$cm}{_methodhash}{$method}{reference}) {
-	  eval {
-	       no strict 'refs';
-	       goto &{$self->{$cm}{_methodhash}{$method}{reference}};
+	  {
+	      my $method = \&{$self->{$cm}{_methodhash}{$method}{reference}};
+	      goto &$method;
 	  }
      }
      else {