diff --git a/collects/framework/private/text.ss b/collects/framework/private/text.ss
index 0437e1ad8c..759d0476ad 100644
--- a/collects/framework/private/text.ss
+++ b/collects/framework/private/text.ss
@@ -2168,7 +2168,8 @@ designates the character that triggers autocompletion
       get-autocomplete-background-color
       get-autocomplete-selected-color
       completion-mode-key-event?
-      get-all-words))
+      get-all-words
+      get-word-at))
   
   ;; ============================================================
   ;; auto-complete-text (mixin) implementation