From a5382b763c2faa4c47e55ee0e49889b4c47daac4 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Mon, 5 Oct 2009 13:44:33 -0300
Subject: new function lua_copy

---
 lstate.c | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

(limited to 'lstate.c')

diff --git a/lstate.c b/lstate.c
index bc56079f..b571c828 100644
--- a/lstate.c
+++ b/lstate.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lstate.c,v 2.60 2009/09/28 13:50:19 roberto Exp roberto $
+** $Id: lstate.c,v 2.61 2009/09/30 20:49:47 roberto Exp roberto $
 ** Global State
 ** See Copyright Notice in lua.h
 */
@@ -100,8 +100,7 @@ static int cpcall (lua_State *L) {
   lua_CFunction f = *(lua_CFunction *)lua_touserdata(L, 1);
   lua_remove(L, 1);  /* remove f from stack */
   /* restore original environment for 'cpcall' */
-  lua_pushvalue(L, LUA_GLOBALSINDEX);
-  lua_replace(L, LUA_ENVIRONINDEX);  
+  lua_copy(L, LUA_GLOBALSINDEX, LUA_ENVIRONINDEX);
   return f(L);
 }
 
-- 
cgit v1.2.3-55-g6feb