diff options
| -rw-r--r-- | vms/writemain.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/vms/writemain.pl b/vms/writemain.pl index eb059f810a..5f1c8bf0d3 100644 --- a/vms/writemain.pl +++ b/vms/writemain.pl @@ -40,8 +40,10 @@ xs_init() EOH if (@ARGV) { + $names = join(' ',@ARGV); + $names =~ tr/"//d; # Plan9 doesn't remove "" on command line # Allow for multiple names in one quoted group - @exts = split(/\s+/, join(' ',@ARGV)); + @exts = split(/\s+/,$names); } if (@exts) { |