1 files changed, 11 insertions, 2 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index 7f8d68c..d120d5b 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -463,14 +463,23 @@ static const UnsafeEnsembleInfo unsafeEnsembleCommands[] = {
     {"process", "status"},
     {"process", "purge"},
     {"process", "autopurge"},
-    /* [zipfs] has MANY unsafe commands! */
+    /* 
+     * [zipfs] perhaps has some safe commands. But like file make it inaccessible
+     * until they are analyzed to be safe.
+     */
+    {"zipfs", NULL},
+    {"zipfs", "canonical"},
+    {"zipfs", "exists"},
+    {"zipfs", "info"},
+    {"zipfs", "list"},
     {"zipfs", "lmkimg"},
     {"zipfs", "lmkzip"},
     {"zipfs", "mkimg"},
     {"zipfs", "mkkey"},
     {"zipfs", "mkzip"},
     {"zipfs", "mount"},
-    {"zipfs", "mount_data"},
+    {"zipfs", "mountdata"},
+    {"zipfs", "root"},
     {"zipfs", "unmount"},
     {NULL, NULL}
 };