diff --git a/rmq/poke.rkt b/rmq/poke.rkt
index 67aba58..a4b50ee 100644
--- a/rmq/poke.rkt
+++ b/rmq/poke.rkt
@@ -37,6 +37,8 @@
              (match (string-split (string-trim (bytes->string/utf-8 bs)))
                [(list "topic" topic)
                 (request! 'put `("topic" (,topic ())))]
+               [(list "deltopic" topic)
+                (request! 'delete `("topic" (,topic ())))]
                [(list* "pub" topic strs)
                 (request! 'post `("topic" (,topic ()))
                           #:body (string->bytes/utf-8 (string-join strs)))]