commit 3355d55

default  ·  2024-05-07 18:51:24 +0000 UTC
parent 82ec4ea 
New op #3 to list_maint() (get list name).
1 files changed,  +13, -0
M data.c
M data.c
+13, -0 
 1@@ -1829,6 +1829,19 @@ xs_val *list_maint(snac *user, const char *list, int op)
 2             }
 3         }
 4 
 5+        break;
 6+
 7+    case 3: /** get list name **/
 8+        if (xs_is_hex(list)) {
 9+            FILE *f;
10+            xs *fn = xs_fmt("%s/list/%s.id", user->basedir, list);
11+
12+            if ((f = fopen(fn, "r")) != NULL) {
13+                l = xs_strip_i(xs_readline(f));
14+                fclose(f);
15+            }
16+        }
17+
18         break;
19     }
20