From be666a662b79e12c300dbf6d74d0a6626acac06f Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Thu, 25 Aug 2005 16:55:38 -0300
Subject: detail

---
 lua.c     | 5 ++---
 luaconf.h | 4 ++--
 2 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/lua.c b/lua.c
index 40da9b16..28975968 100644
--- a/lua.c
+++ b/lua.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lua.c,v 1.146 2005/06/28 13:01:50 roberto Exp roberto $
+** $Id: lua.c,v 1.147 2005/08/25 15:39:16 roberto Exp roberto $
 ** Lua stand-alone interpreter
 ** See Copyright Notice in lua.h
 */
@@ -137,8 +137,7 @@ static int dolibrary (lua_State *L, const char *name) {
 
 static const char *get_prompt (lua_State *L, int firstline) {
   const char *p;
-  lua_pushstring(L, firstline ? "_PROMPT" : "_PROMPT2");
-  lua_rawget(L, LUA_GLOBALSINDEX);
+  lua_getfield(L, LUA_GLOBALSINDEX, firstline ? "_PROMPT" : "_PROMPT2");
   p = lua_tostring(L, -1);
   if (p == NULL) p = (firstline ? LUA_PROMPT : LUA_PROMPT2);
   lua_pop(L, 1);  /* remove global */
diff --git a/luaconf.h b/luaconf.h
index 8a57dddd..fc5c2db0 100644
--- a/luaconf.h
+++ b/luaconf.h
@@ -1,5 +1,5 @@
 /*
-** $Id: luaconf.h,v 1.60 2005/08/17 18:32:09 roberto Exp roberto $
+** $Id: luaconf.h,v 1.61 2005/08/22 19:58:29 roberto Exp roberto $
 ** Configuration file for Lua
 ** See Copyright Notice in lua.h
 */
@@ -631,7 +631,7 @@ union luai_Cast { double l_d; long l_l; };
 #else
 
 #define lua_popen(L,c,m)  \
-	((void)c, (void)m, luaL_error(L, LUA_QL("popen") "not supported"), NULL)
+  ((void)c, (void)m, luaL_error(L, LUA_QL("popen") " not supported"), (FILE*)0)
 #define lua_pclose(L,file)		((void)file, 0)
 
 #endif
-- 
cgit v1.2.3-55-g6feb