Lines 278-283
if ($zebraqueue_days) {
Link Here
|
278 |
|
278 |
|
279 |
if ($mail) { |
279 |
if ($mail) { |
280 |
print "Mail queue purge triggered for $mail days.\n" if $verbose; |
280 |
print "Mail queue purge triggered for $mail days.\n" if $verbose; |
|
|
281 |
$count = 0; |
281 |
$sth = $dbh->prepare( |
282 |
$sth = $dbh->prepare( |
282 |
q{ |
283 |
q{ |
283 |
DELETE FROM message_queue |
284 |
DELETE FROM message_queue |
Lines 287-294
if ($mail) {
Link Here
|
287 |
if ( $confirm ) { |
288 |
if ( $confirm ) { |
288 |
$sth->execute($mail) or die $dbh->errstr; |
289 |
$sth->execute($mail) or die $dbh->errstr; |
289 |
$count = $sth->rows; |
290 |
$count = $sth->rows; |
|
|
291 |
print "$count messages were deleted from the mail queue.\nDone with message_queue purge.\n" if $verbose; |
292 |
} else { |
293 |
print "Messages were deleted from the mail queue.\nDone with message_queue purge.\n" if $verbose; |
290 |
} |
294 |
} |
291 |
print "$count messages were deleted from the mail queue.\nDone with message_queue purge.\n" if $verbose; |
|
|
292 |
} |
295 |
} |
293 |
|
296 |
|
294 |
if ($purge_merged) { |
297 |
if ($purge_merged) { |
295 |
- |
|
|