chiark / gitweb /
writeable lookups now compile
[chiark-tcl.git] / cdb / cdb.tct
index 29325f19cb339e0ebdd0a7e707f70b0caaea3fe1..4df47f3bd54d3e97200b2f675d89e0c038b6c076 100644 (file)
@@ -89,8 +89,8 @@ Table cdbwr Cdbwr_SubCommand
        lookup-hb 0
                db      iddata(&cdbtcl_rwdatabases)
                key     string
-               ?def    hb
-               =>      hb
+               ?def    obj
+               =>      obj
        delete 0
                db      iddata(&cdbtcl_rwdatabases)
                key     string