lua

commit 942496d767dff060250d5b45add0d9bf551843be
parent a535ad6fee6b0a5fc795dc1dfe8737b63b3684d8
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Tue, 13 Jul 2004 17:11:10 -0300

small bug

Diffstat:
M
lauxlib.c
 | 
7
++++---

1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/lauxlib.c b/lauxlib.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lauxlib.c,v 1.119 2004/07/01 14:26:28 roberto Exp roberto $
+** $Id: lauxlib.c,v 1.120 2004/07/09 18:23:17 roberto Exp roberto $
 ** Auxiliary functions for building Lua libraries
 ** See Copyright Notice in lua.h
 */
@@ -383,9 +383,10 @@ static const char *luaL_gsub (lua_State *L, const char *s,
 LUALIB_API const char *luaL_searchpath (lua_State *L, const char *name,
                                                       const char *path) {
   FILE *f;
-  const char *p = path;
-  if (p == NULL) p = getpath(L);
+  const char *p;
+  if (path == NULL) path = getpath(L);
   else lua_pushnil(L);  /* to balance item pushed by `getpath' */
+  p = path;
   for (;;) {
     const char *fname;
     if ((p = pushnexttemplate(L, p)) == NULL) {