From 31d6cee25636b4a51cd87103a393666f53f71360 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Marc=20Andr=C3=A9=20Tanner?= Date: Thu, 17 Sep 2020 14:58:09 +0200 Subject: vis-lua: provide vis.mark property --- vis-lua.c | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) (limited to 'vis-lua.c') diff --git a/vis-lua.c b/vis-lua.c index 4d62af3..f59528c 100644 --- a/vis-lua.c +++ b/vis-lua.c @@ -1387,6 +1387,10 @@ static int redraw(lua_State *L) { * Register name in use. * @tfield string register */ +/*** + * Mark name in use. + * @tfield string mark + */ static int vis_index(lua_State *L) { Vis *vis = obj_ref_check(L, 1, "vis"); @@ -1435,6 +1439,12 @@ static int vis_index(lua_State *L) { return 1; } + if (strcmp(key, "mark") == 0) { + char name = vis_mark_to(vis, vis_mark_used(vis)); + lua_pushlstring(L, &name, 1); + return 1; + } + if (strcmp(key, "ui") == 0) { obj_ref_new(L, vis->ui, VIS_LUA_TYPE_UI); return 1; @@ -1475,6 +1485,13 @@ static int vis_newindex(lua_State *L) { vis_register(vis, vis_register_from(vis, name[0])); return 0; } + + if (strcmp(key, "mark") == 0) { + const char *name = luaL_checkstring(L, 3); + if (strlen(name) == 1) + vis_mark(vis, vis_mark_from(vis, name[0])); + return 0; + } } return newindex_common(L); } -- cgit v1.2.3