From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 2 Aug 2001 14:22:31 +0000 (+0000)
Subject: setproctitle() API version nit from Anton Berezin.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=98b76f992197f690cea50f5d8d9a710f0c2c5970;p=p5sagit%2Fp5-mst-13.2.git

setproctitle() API version nit from Anton Berezin.

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

diff --git a/mg.c b/mg.c
index d517cc5..5a8c189 100644
--- a/mg.c
+++ b/mg.c
@@ -2084,7 +2084,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg)
 	 * the setproctitle() routine to manipulate that. */
 	{
 	    s = SvPV(sv, len);
-#   if __FreeBSD_version >= 410001
+#   if __FreeBSD_version > 410001
 	    /* The leading "-" removes the "perl: " prefix,
 	     * but not the "(perl) suffix from the ps(1)
 	     * output, because that's what ps(1) shows if the