summaryrefslogtreecommitdiff
path: root/vms
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-05-20 02:49:22 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-05-20 02:49:22 +0000
commit8c3eed297cdb66c1ea74e86eef11502fcd67897c (patch)
tree57814806b8e026724cea34f303eda75c878d47a5 /vms
parentd93d2cac158073b5f64458507d122ca0aa8e3fcb (diff)
downloadperl-8c3eed297cdb66c1ea74e86eef11502fcd67897c.tar.gz
Missed hunk from #16701.
p4raw-id: //depot/perl@16704
Diffstat (limited to 'vms')
-rw-r--r--vms/vms.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/vms/vms.c b/vms/vms.c
index 124fd15eca..52ce6ef906 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -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 '>', '>>',