suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Making autocomplete-mixin's get-word-at public in preparation for fixing PR 8925

Browse Source 
svn: r7319
This commit is contained in:
Jacob Matthews 2007-09-11 20:47:55 +00:00
parent 9096231611
commit 188186ca25
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/framework/private/text.ss
View File

@ -2240,7 +2240,7 @@ designates the character that triggers autocompletion
;; Number -> String ;; Number -> String
;; The word that ends at the current positon of the editor ;; The word that ends at the current positon of the editor
(define/private (get-word-at current-pos) (define/public (get-word-at current-pos)
(let ([start-pos (box current-pos)]) (let ([start-pos (box current-pos)])
(find-wordbreak start-pos #f 'caret) (find-wordbreak start-pos #f 'caret)
(get-text (unbox start-pos) current-pos))) (get-text (unbox start-pos) current-pos)))