430 { |
430 { |
431 lua_pop(L, 1); |
431 lua_pop(L, 1); |
432 lua_newtable(L); |
432 lua_newtable(L); |
433 lua_pushvalue(L, -2); /* k */ |
433 lua_pushvalue(L, -2); /* k */ |
434 lua_pushvalue(L, -2); /* v */ |
434 lua_pushvalue(L, -2); /* v */ |
435 lua_settable(L, -6); /* ret.subject[k] = v */ |
435 lua_settable(L, -5); /* ret.subject[k] = v */ |
436 /* Get short/long name of the entry */ |
436 /* Get short/long name of the entry */ |
437 len = OBJ_obj2txt(buffer, sizeof(buffer), object, 0); |
437 len = OBJ_obj2txt(buffer, sizeof(buffer), object, 0); |
438 lua_pushlstring(L, buffer, (len>sizeof(buffer))?sizeof(buffer):(len)); |
438 lua_pushlstring(L, buffer, (len>sizeof(buffer))?sizeof(buffer):(len)); |
439 lua_setfield(L, -2, "name"); |
439 lua_setfield(L, -2, "name"); |
440 } |
440 } |