use dispatch()

[chiark-tcl.git] / adns / adns.tct

diff --git a/adns/adns.tct b/adns/adns.tct
index a1c27565ec4cd3b884f419e010e860ea4a40465f..7abfc9f4697c78a3c5cc6f6bbebe44b127d67c06 100644 (file)
--- a/adns/adns.tct
+++ b/adns/adns.tct
@@ -23,8 +23,7 @@ Fini adnsresults              free(@);
 
 Table *adnstoplevel TopLevel_Command
        adns
-               subcmd  enum(Adns/_SubCommand, "adns subcommand")
-               ...     obj
+               dispatch(Adns/_SubCommand, "adns subcommand")
 
 Table adns Adns_SubCommand
        lookup