diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-20 02:49:22 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-20 02:49:22 +0000 |
commit | 8c3eed297cdb66c1ea74e86eef11502fcd67897c (patch) | |
tree | 57814806b8e026724cea34f303eda75c878d47a5 | |
parent | d93d2cac158073b5f64458507d122ca0aa8e3fcb (diff) | |
download | perl-8c3eed297cdb66c1ea74e86eef11502fcd67897c.tar.gz |
Missed hunk from #16701.
p4raw-id: //depot/perl@16704
-rw-r--r-- | vms/vms.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3936,11 +3936,11 @@ mp_getredirection(pTHX_ int *ac, char ***av) */ ap = argv[argc-1]; if (0 == strcmp("&", ap)) - exit(background_process(--argc, argv)); + exit(background_process(aTHX_ --argc, argv)); if (*ap && '&' == ap[strlen(ap)-1]) { ap[strlen(ap)-1] = '\0'; - exit(background_process(argc, argv)); + exit(background_process(aTHX_ argc, argv)); } /* * Now we handle the general redirection cases that involve '>', '>>', |