X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-tcl.git;a=blobdiff_plain;f=cdb%2Fcdb.tct;h=a7d22b468cb3ccef22131fb14e9fa2271fc877ff;hp=4df47f3bd54d3e97200b2f675d89e0c038b6c076;hb=602f89cabd45c343f6adb4b788d26d316f5be47b;hpb=9eb8c5c8a5caa7264d7d3464cf650baffb42a05c diff --git a/cdb/cdb.tct b/cdb/cdb.tct index 4df47f3..a7d22b4 100644 --- a/cdb/cdb.tct +++ b/cdb/cdb.tct @@ -13,11 +13,13 @@ Table cdb Cdb_SubCommand lookup db iddata(&cdbtcl_databases) key obj + ?def obj => obj lookup-hb db iddata(&cdbtcl_databases) key hb - => hb + ?def obj + => obj close db iddata(&cdbtcl_databases)