diff --git a/collects/drracket/private/syncheck/gui.rkt b/collects/drracket/private/syncheck/gui.rkt
index baa68ba8d9..7fd8ba38ae 100644
--- a/collects/drracket/private/syncheck/gui.rkt
+++ b/collects/drracket/private/syncheck/gui.rkt
@@ -1021,7 +1021,7 @@ If the namespace does not, they are colored the unbound color.
                 (start-arrow-draw-timer syncheck-arrow-delay))
               
               (let/ec break
-                (when (send event button-down? 'right)
+                (when (and arrow-records (send event button-down? 'right))
                   (define menu
                     (let-values ([(pos text) (get-pos/text event)])
                       (syncheck:build-popup-menu pos text)))