ui.tools.operations: Don't annotate regular objects, only words.

diff --git a/basis/ui/tools/operations/operations.factor b/basis/ui/tools/operations/operations.factor
index c2019b60c42ac5abc4025f80258137b08bd3a18a..c449667d9a8362ddb2682c9322174fd05b9e5d91 100644 (file)
--- a/basis/ui/tools/operations/operations.factor
+++ b/basis/ui/tools/operations/operations.factor
@@ -119,7 +119,7 @@ IN: ui.tools.operations
     { +listener+ t }
 } define-operation
 
-[ annotated? not ] \ watch H{ } define-operation
+[ [ annotated? not ] [ word? ] bi and ] \ watch H{ } define-operation
 
 [ annotated? ] \ reset H{ } define-operation