[Slim-Checkins] r8806 - /trunk/server/Slim/Utils/Timers.pm

[andy at svn.slimdevices.com]

Author: andy
Date: Fri Aug  4 21:58:39 2006
New Revision: 8806

URL: http://svn.slimdevices.com?rev=8806&view=rev
Log:
Clean up a warning

Modified:
    trunk/server/Slim/Utils/Timers.pm

Modified: trunk/server/Slim/Utils/Timers.pm
URL: http://svn.slimdevices.com/trunk/server/Slim/Utils/Timers.pm?rev=8806&r1=8805&r2=8806&view=diff
==============================================================================
--- trunk/server/Slim/Utils/Timers.pm (original)
+++ trunk/server/Slim/Utils/Timers.pm Fri Aug  4 21:58:39 2006
@@ -47,6 +47,7 @@
 		eval {
 			require POE::XS::Queue::Array;
 			die if $POE::XS::Queue::Array::VERSION eq '0.001'; # 0.001 has memory leaks
+			warn "*** Using POE::XS::Queue::Array for timers\n";
 			$hasXS = 1;
 		};
 		if ($@) {
@@ -255,7 +256,7 @@
 		my $name  = Slim::Utils::PerlRunTime::realNameForCodeRef( $timer->{'subptr'} );
 		my $diff  = $timer->{'when'} - $now;
 		
-		my $obj = $timer->{'objRef'};
+		my $obj = $timer->{'objRef'} || '';
 		if ( blessed $obj && $obj->isa('Slim::Player::Client') ) {
 			$obj = $obj->macaddress();
 		}