From: ian <ian>
Date: Sun, 5 Feb 2006 00:58:18 +0000 (+0000)
Subject: implement cht_do_cdbwr_open_okjunk
X-Git-Tag: debian/1.1.1~73
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=a1cd415041c7d748f47e3e33fc40d75553391c3a;p=chiark-tcl.git

implement cht_do_cdbwr_open_okjunk
---

diff --git a/cdb/writeable.c b/cdb/writeable.c
index 3205ff0..e04cf69 100644
--- a/cdb/writeable.c
+++ b/cdb/writeable.c
@@ -493,6 +493,12 @@ int cht_do_cdbwr_open(ClientData cd, Tcl_Interp *ip, const char *pathb,
   return rc;
 }
 
+int cht_do_cdbwr_open_okjunk(ClientData cd, Tcl_Interp *ip, const char *pathb,
+		      Tcl_Obj *on_info, Tcl_Obj *on_lexminval,
+		      void **result) {
+  return cht_do_cdbwr_open(cd,ip,pathb,on_info,on_lexminval,result);
+}
+
 /*==================== COMPACTION ====================*/
 
 struct ht_forall_ctx {