Changeset 118

Show
Ignore:
Timestamp:
09/25/06 19:34:28 (2 years ago)
Author:
evdb
Message:

better messages

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/lib/PrlMnks/Daemon.pm

    r117 r118  
    5050    return if $self->delay_for_id($id); 
    5151 
    52     $self->debug("\tFetching node $id.\n"); 
     52    $self->debug( "\n" . ( '-' x 40 ) . "\n\tFetching node $id.\n" ); 
    5353 
    5454    # If the node is already in the database then return true 
    …… 
    9696    $self->debug("\t\twrote xml for $actual_id to file\n"); 
    9797 
    98     return 1 unless $node;                # broken XML. 
    99     return 1 unless $node->is_allowed;    # we don't store these in db. 
     98    return 1 unless $node;    # broken XML. 
     99 
     100    # we don't store these in db. 
     101    unless ( $node->is_allowed ) { 
     102        $self->debug("\t\tXML for $actual_id is '401'\n"); 
     103        return 1; 
     104    } 
    100105 
    101106    die "Could not save to db $node_xml" unless $node->save_to_db;