wikiheaders.pl: Add --copy-to-header option.

...because I keep mistyping it without the 's' on the end.  :/
This commit is contained in:
Ryan C. Gordon 2021-07-14 17:07:41 -04:00
parent c88eb7a896
commit c07e5e99c8
No known key found for this signature in database
GPG Key ID: FA148B892AB48044
1 changed files with 1 additions and 0 deletions

View File

@ -12,6 +12,7 @@ my $copy_direction = 0;
foreach (@ARGV) { foreach (@ARGV) {
$warn_about_missing = 1, next if $_ eq '--warn-about-missing'; $warn_about_missing = 1, next if $_ eq '--warn-about-missing';
$copy_direction = 1, next if $_ eq '--copy-to-headers'; $copy_direction = 1, next if $_ eq '--copy-to-headers';
$copy_direction = 1, next if $_ eq '--copy-to-header';
$copy_direction = -1, next if $_ eq '--copy-to-wiki'; $copy_direction = -1, next if $_ eq '--copy-to-wiki';
$srcpath = $_, next if not defined $srcpath; $srcpath = $_, next if not defined $srcpath;
$wikipath = $_, next if not defined $wikipath; $wikipath = $_, next if not defined $wikipath;