Fix bug #24383, where hashes with the :unique attribute weren't

[p5sagit/p5-mst-13.2.git] / x2p / a2p.c

diff --git a/x2p/a2p.c b/x2p/a2p.c
index 4cf6c51..af97c91 100644 (file)
--- a/x2p/a2p.c
+++ b/x2p/a2p.c
@@ -5,7 +5,8 @@
 #line 2 "a2p.y"
 /* $RCSfile: a2p.y,v $$Revision: 4.1 $$Date: 92/08/07 18:29:12 $
  *
- *    Copyright (c) 1991-2001, Larry Wall
+ *    Copyright (C) 1991, 1992, 1993, 1994, 1996, 1997, 1998, 1999,
+ *    2000, 2001, by Larry Wall and others
  *
  *    You may distribute under the terms of either the GNU General Public
  *    License or the Artistic License, as specified in the README file.
@@ -2089,7 +2090,7 @@ yyparse()
     register char *yys;
     extern char *getenv();
 
-    if (yys = getenv("YYDEBUG"))
+    if ((yys = getenv("YYDEBUG")))
     {
         yyn = *yys;
         if (yyn >= '0' && yyn <= '9')