Added get-word-at to autocomplete<%> interface

svn: r7331 original commit: 3214a710045d0c2939300a56f164f752843b2dc8
2007-09-14 14:08:39 +00:00 · 2007-09-14 14:08:39 +00:00 · 14679861ee
commit 14679861ee
parent e1226a3c02
1 changed files with 2 additions and 1 deletions
--- 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