X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FStem%2FConf.pm;h=cff47bad1e97d3d02fb501099a0aedf6adffb6cf;hb=56f74ebb051e474ced234286cd79303f3e9cd14c;hp=9def747ba4246afcfc0a634320dd16cb0897faea;hpb=456e158d69d784e044a506a053a2ff671c67c1c9;p=urisagit%2FStem.git

diff --git a/lib/Stem/Conf.pm b/lib/Stem/Conf.pm
index 9def747..cff47ba 100644
--- a/lib/Stem/Conf.pm
+++ b/lib/Stem/Conf.pm
@@ -230,7 +230,11 @@ sub configure {
 
 		no strict 'refs' ;
 
-		unless ( %{"${class}::"} ) {
+        my %loaded_packages = map { $_ => 1 } keys %{*{"main\::"}};
+
+		unless ( $loaded_packages{"$class\::"} ) {
+
+#print "attempting to load $class\n";
 
 			my $module = $class ;
 			$module =~ s{::}{/}g ;