Movable Type's Publish Queue

mt-rebuild-queue

use MT;
my $mt = MT->new;
require MT::TheSchwartz::FuncMap;
require MT::TheSchwartz::Job;
require MT::FileInfo;
require MT::WeblogPublisher;
my $funcmap = MT::TheSchwartz::FuncMap->load( { funcname => 'MT::Worker::Publish' } );
return unless $funcmap;
my @jobs = MT::TheSchwartz::Job->load( { funcid => $funcmap->funcid, },
                                       { 'sort' => 'priority',
                                         direction => 'ascend',
                                       },
                                     );
my $pub = MT::WeblogPublisher->new;
for my $job ( @jobs ) {
    if ( my $key = $job->uniqkey ) {
        if ( my $finfo = MT::FileInfo->load( $key ) ) {
            if ( $pub->rebuild_from_fileinfo( $finfo ) ) {
                $job->remove or die $job->errstr;
            }
        }
    }
}