From 5167a5b15b8d6d0a503d8b495559d7e964d46f99 Mon Sep 17 00:00:00 2001
From: Chip Salzenberg <chip@atlantic.net>
Date: Wed, 9 Apr 1997 00:00:00 +0000
Subject: Fix for incorrect overloaded assignment

(this is the same change as commit 9de372454b482d4516b3f3c85b686af8cb18d211, but as applied)
---
 gv.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'gv.c')

diff --git a/gv.c b/gv.c
index 9aa4c54d52..8bb1f10105 100644
--- a/gv.c
+++ b/gv.c
@@ -1344,7 +1344,7 @@ int flags;
     EXTEND(sp, notfound + 5);
     PUSHs(lr>0? right: left);
     PUSHs(lr>0? left: right);
-    PUSHs( assign ? &sv_undef : boolSV(lr>0) );
+    PUSHs( lr > 0 ? &sv_yes : ( assign ? &sv_undef : &sv_no ));
     if (notfound) {
       PUSHs( sv_2mortal(newSVpv((char *)AMG_names[method + assignshift],0)) );
     }
-- 
cgit v1.2.1