Index: slimserver.pl
===================================================================
--- slimserver.pl	(revision 7199)
+++ slimserver.pl	(working copy)
@@ -149,14 +149,21 @@
 						next;
 					}
 
-					delete $INC{$newModule};
+					my $newModuleSymbol = $newModule;
 
-					$newModule =~ s|/|::|g;
-					$newModule =~ s|\.pm$||;
+					$newModuleSymbol =~ s|/|::|g;
+					$newModuleSymbol =~ s|\.pm$||;
 
-					$d_startup && print "Removing [$newModule] from the symbol table. It (or it's parent) failed to load.\n";
+					# This relies on delete_package returning a true value if 
+					# it succeeded.
+					my $removed = eval {
+						Symbol::delete_package($newModuleSymbol);
+					};
 
-					Symbol::delete_package($newModule);
+					if ($removed) {
+						$d_startup && print "Removing [$newModuleSymbol] from the symbol table. It (or it's parent) failed to load.\n";
+						delete $INC{$newModule};
+					}
 				}
 
 			} else {