Changeset 155

Timestamp:

12/04/05 00:42:34 (3 years ago)

Author:

ogawa

Message:

Logging properly even if using future posting.
And a minor bug fix.

Files:

• update-n-ping/trunk/update-n-ping.pl (modified) (4 diffs)

update-n-ping/trunk/update-n-ping.pl

@@ -12 +12 @@
 use base 'MT::Plugin';
 use vars qw($VERSION);
-$VERSION = '0.12';
+$VERSION = '0.13';
 
 my $plugin = MT::Plugin::Update_n_Ping->new({
@@ -35 +35 @@
 sub update_n_ping {
     my ($eh, $app, $entry) = @_;
-    return if $entry->status != MT::Entry::RELEASE();
+    return if !UNIVERSAL::isa($entry, 'MT::Entry') || $entry->status != MT::Entry::RELEASE();
 
     my $entry_id = $entry->id;
@@ -67 +67 @@
     }
 
+    require MT::XMLRPC;
     require MT::Blog;
-    require MT::XMLRPC;
     my $blog = MT::Blog->load($blog_id);
     for my $url (@ping_urls) {
@@ -77 +77 @@
             $msg .= 'failed. ' . MT::XMLRPC->errstr;
         }
-        $app->log($msg);
+        require MT::Log;
+        my $log = MT::Log->new;
+        $log->blog_id($blog_id);
+        $log->message($msg);
+        $log->save or die $log->errstr;
     }
 }