489 |
## it returns an array of files, %s, sent from the loginfo |
## it returns an array of files, %s, sent from the loginfo |
490 |
## command |
## command |
491 |
# |
# |
492 |
# -D - Send diffs in emails. |
# -d - Send diffs in emails. |
493 |
# -d DIFF_ARG - Pass DIFF_ARG to `cvs diff' when generating diffs. Defaults |
# -D DIFF_ARG - Pass DIFF_ARG to `cvs diff' when generating diffs. Defaults |
494 |
# to `-ub'. Multiple invocations will pass all DIFF_ARGS |
# to `-ub'. Multiple invocations will pass all DIFF_ARGS |
495 |
# (though first invocation always removes the default `-ub'). |
# (though first invocation always removes the default `-ub'). |
496 |
# Implies `-D'. |
# Implies `-D'. |
509 |
|
|
510 |
while (@argv) { |
while (@argv) { |
511 |
$arg = shift @argv; |
$arg = shift @argv; |
512 |
if ($arg eq '-D') { |
if ($arg eq '-d') { |
513 |
$SEND_DIFF = "true"; |
$SEND_DIFF = "true"; |
514 |
} elsif ($arg eq '-d') { |
} elsif ($arg eq '-D') { |
515 |
push @diffargs, shift @argv; |
push @diffargs, shift @argv; |
516 |
$SEND_DIFF = "true"; |
$SEND_DIFF = "true"; |
517 |
} elsif ($arg eq '-m') { |
} elsif ($arg eq '-m') { |