From: Nicholas Clark <nick@ccl4.org>
Date: Fri, 18 Jan 2008 11:01:15 +0000 (+0000)
Subject: Change 32997 missed one conditionally unused argument.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b3c649451aa23903a1f1aa5b0d54e8244611b239;p=p5sagit%2Fp5-mst-13.2.git

Change 32997 missed one conditionally unused argument.

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

diff --git a/perl.c b/perl.c
index 89dc73a..ccdfa9f 100644
--- a/perl.c
+++ b/perl.c
@@ -3774,6 +3774,8 @@ S_validate_suid(pTHX_ const char *validarg, const char *scriptname,
 #ifdef DOSUID
 #  ifdef IAMSUID
     PERL_UNUSED_ARG(scriptname);
+#  else
+    PERL_UNUSED_ARG(suidscript);
 #  endif
 #else
     PERL_UNUSED_ARG(validarg);