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

finished auto completion integration

Browse Source 
svn: r7304

original commit: 6b6f397a64e0c72294cf281fefcac35b5e119d63
This commit is contained in:
Robby Findler 2007-09-10 00:46:31 +00:00
parent fd4fcc42dc
commit 14e7cef7af
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -2173,6 +2173,8 @@ designates the character that triggers autocompletion
;; ============================================================
;; auto-complete-text (mixin) implementation
(define selected-color (make-object color% 204 153 255))
(define autocomplete-mixin
(mixin ((class->interface text%)) (autocomplete<%>)
@ -2189,7 +2191,7 @@ designates the character that triggers autocompletion
; get-autocomplete-selected-color : -> string
; selected option background color in the autocomplete menu
(define/public (get-autocomplete-selected-color) "orange")
(define/public (get-autocomplete-selected-color) selected-color)
(define/public (completion-mode-key-event? key-event)
(cond