From ad47d346bad2fdb6f5e4b8f9a5a69dda7e7b4726 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Sun, 9 Jan 2011 15:38:24 -0600 Subject: [PATCH] move the text class creation calls back to the end of the file --- collects/framework/private/text.rkt | 35 +++++++++++++++-------------- 1 file changed, 18 insertions(+), 17 deletions(-) diff --git a/collects/framework/private/text.rkt b/collects/framework/private/text.rkt index 02b706d360..ef6b892cb5 100644 --- a/collects/framework/private/text.rkt +++ b/collects/framework/private/text.rkt @@ -3689,23 +3689,6 @@ designates the character that triggers autocompletion (send e set-position (send e last-position) (send e last-position)) (send f show #t))) -(define basic% (basic-mixin (editor:basic-mixin text%))) -(define hide-caret/selection% (hide-caret/selection-mixin basic%)) -(define nbsp->space% (nbsp->space-mixin basic%)) -(define normalize-paste% (normalize-paste-mixin basic%)) -(define delegate% (delegate-mixin basic%)) -(define wide-snip% (wide-snip-mixin basic%)) -(define standard-style-list% (editor:standard-style-list-mixin wide-snip%)) -(define input-box% (input-box-mixin standard-style-list%)) -(define -keymap% (editor:keymap-mixin standard-style-list%)) -(define return% (return-mixin -keymap%)) -(define autowrap% (editor:autowrap-mixin -keymap%)) -(define file% (file-mixin (editor:file-mixin autowrap%))) -(define clever-file-format% (clever-file-format-mixin file%)) -(define backup-autosave% (editor:backup-autosave-mixin clever-file-format%)) -(define searching% (searching-mixin backup-autosave%)) -(define info% (info-mixin (editor:info-mixin searching%))) - ;; ============================================================ ;; line number text% @@ -3990,3 +3973,21 @@ designates the character that triggers autocompletion (super-new) (setup-padding))) + + +(define basic% (basic-mixin (editor:basic-mixin text%))) +(define hide-caret/selection% (hide-caret/selection-mixin basic%)) +(define nbsp->space% (nbsp->space-mixin basic%)) +(define normalize-paste% (normalize-paste-mixin basic%)) +(define delegate% (delegate-mixin basic%)) +(define wide-snip% (wide-snip-mixin basic%)) +(define standard-style-list% (editor:standard-style-list-mixin wide-snip%)) +(define input-box% (input-box-mixin standard-style-list%)) +(define -keymap% (editor:keymap-mixin standard-style-list%)) +(define return% (return-mixin -keymap%)) +(define autowrap% (editor:autowrap-mixin -keymap%)) +(define file% (file-mixin (editor:file-mixin autowrap%))) +(define clever-file-format% (clever-file-format-mixin file%)) +(define backup-autosave% (editor:backup-autosave-mixin clever-file-format%)) +(define searching% (searching-mixin backup-autosave%)) +(define info% (info-mixin (editor:info-mixin searching%)))