diff --git a/collects/macro-debugger/view/util.ss b/collects/macro-debugger/view/util.ss
index df2cb57b..e1e1d14c 100644
--- a/collects/macro-debugger/view/util.ss
+++ b/collects/macro-debugger/view/util.ss
@@ -103,7 +103,7 @@
            (parent parent)
            (checked (send nb get))
            (callback
-            (lambda _ (send nb set (not (send nb get)))))))
+            (lambda _ (send nb set (send menu-item is-checked?))))))
     (send nb listen (lambda (value) (send menu-item check value)))
     menu-item)