Changed name to get-licensed done
This commit is contained in:
parent
ce05020783
commit
319b30402b
@ -104,7 +104,7 @@ sub handle_files {
|
|||||||
}
|
}
|
||||||
|
|
||||||
if ($app->{'options'}->{'dry'} == 0) {
|
if ($app->{'options'}->{'dry'} == 0) {
|
||||||
copy($name, $name . ".licensor_backup") or die "Could not create backup file";
|
copy($name, $name . ".get_licensed_backup") or die "Could not create backup file";
|
||||||
|
|
||||||
my $wh = FileHandle->new($name, O_WRONLY);
|
my $wh = FileHandle->new($name, O_WRONLY);
|
||||||
print $wh @contents;
|
print $wh @contents;
|
||||||
|
Loading…
Reference in New Issue
Block a user