From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 20 May 2002 02:49:22 +0000 (+0000)
Subject: Missed hunk from #16701.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8c3eed297cdb66c1ea74e86eef11502fcd67897c;p=p5sagit%2Fp5-mst-13.2.git

Missed hunk from #16701.

p4raw-id: //depot/perl@16704
---

diff --git a/vms/vms.c b/vms/vms.c
index 124fd15..52ce6ef 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 '>', '>>',