Compare commits
2 commits
5f3248760e
...
d28ca61a32
| Author | SHA1 | Date | |
|---|---|---|---|
| d28ca61a32 | |||
| 9e63c45f0b |
1 changed files with 5 additions and 2 deletions
|
|
@ -213,6 +213,7 @@ sub ShowUsage {
|
||||||
print " -t don't update project status (test)\n";
|
print " -t don't update project status (test)\n";
|
||||||
print " -n newsgroup post only to newsgroup (for testing)\n";
|
print " -n newsgroup post only to newsgroup (for testing)\n";
|
||||||
print " -o print to STDOUT (for testing or to pipe into inews)\n";
|
print " -o print to STDOUT (for testing or to pipe into inews)\n";
|
||||||
|
print " -s only show which projects are due, implies -tv\n";
|
||||||
print " --datadir path override \$datadir\n";
|
print " --datadir path override \$datadir\n";
|
||||||
print " --nntp-server name override \$nntp-server\n";
|
print " --nntp-server name override \$nntp-server\n";
|
||||||
print " --nntp-port port override \$nntp-port\n";
|
print " --nntp-port port override \$nntp-port\n";
|
||||||
|
|
@ -364,7 +365,7 @@ sub AuthNNTP {
|
||||||
|
|
||||||
### ------------------------------------------------------------------
|
### ------------------------------------------------------------------
|
||||||
### build posting
|
### build posting
|
||||||
# read and parser header and body from files
|
# read and parse header and body from files
|
||||||
# read status file, check due date
|
# read status file, check due date
|
||||||
sub BuildPosting {
|
sub BuildPosting {
|
||||||
my $Project = shift;
|
my $Project = shift;
|
||||||
|
|
@ -520,7 +521,7 @@ sub BuildPosting {
|
||||||
if ($OptForce or (!$LastPosted) or ($LastPosted && $NextPosted <= DateTime->now)) {
|
if ($OptForce or (!$LastPosted) or ($LastPosted && $NextPosted <= DateTime->now)) {
|
||||||
print "... is due and will be posted.\n" if $Config{'verbose'} or $Config{'debug'};
|
print "... is due and will be posted.\n" if $Config{'verbose'} or $Config{'debug'};
|
||||||
} else {
|
} else {
|
||||||
printf ("... is not due (next post at %s).\n", $NextPosted->strftime('%Y-%m-%d'))
|
printf("... is not due (next post at %s).\n", $NextPosted->strftime('%Y-%m-%d'))
|
||||||
if $Config{'verbose'} or $Config{'debug'};
|
if $Config{'verbose'} or $Config{'debug'};
|
||||||
return '';
|
return '';
|
||||||
}
|
}
|
||||||
|
|
@ -855,6 +856,8 @@ Display this man page and exit.
|
||||||
Simulation mode. Don't post, just show which projects would be due.
|
Simulation mode. Don't post, just show which projects would be due.
|
||||||
Implies B<--test> and B<--verbose>.
|
Implies B<--test> and B<--verbose>.
|
||||||
|
|
||||||
|
Can be combined with B<--project> to show if just one project is due.
|
||||||
|
|
||||||
=item B<-t>, B<--test>
|
=item B<-t>, B<--test>
|
||||||
|
|
||||||
Test mode. Don't update project status (time and Message-ID of last
|
Test mode. Don't update project status (time and Message-ID of last
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue