| Subject: | Allow forced creation of the output file |
If the output file exists, prefer it over $self->{structure}->{package}.
This way, a person can effectively force _write_file() to use the output
file by, say, touch'ing it.
I would like to automate the creation of test files with formatted
names. If I am missing something that does this already, please point
me in the right direction and close this ticket. :-)
Thanks,
-Gene
Software Engineer-at-large
| Subject: | Test-StubGenerator-diff-01.txt |
297,298c297,298
< my $filename = $self->{structure}->{package}
< ? $self->{structure}->{package} # give preference to found package name
---
> my $filename = $self->{structure}->{package} && !-f "$self->{out_dir}/$self->{output}"
> ? $self->{structure}->{package} # give preference to found package name if no output file exists