Make `create-new-tab' public.

(cherry picked from commit 319a158dec)
This commit is contained in:
Eli Barzilay 2011-10-17 11:47:41 -04:00
parent 6d49072822
commit e1ffc0dd9a
3 changed files with 6 additions and 1 deletions

View File

@ -37,6 +37,7 @@ remain the same for tools that use them.
execute-callback
get-current-tab
open-in-new-tab
create-new-tab
close-current-tab
on-tab-change
enable-evaluation

View File

@ -2770,7 +2770,7 @@ module browser threading seems wrong.
;; create-new-tab : -> void
;; creates a new tab and updates the GUI for that new tab
(define/private create-new-tab
(define/public create-new-tab
(lambda ([filename #f])
(let* ([defs (new (drracket:get/extend:get-definitions-text))]
[tab-count (length tabs)]

View File

@ -608,6 +608,10 @@ Returns the currently active tab.
It loads that file in the definitions window of the new tab.
}
@defmethod[(create-new-tab) void?]{
Creates a new tab.
}
@defmethod[(next-tab) void?]{
Switches to the next tab.
}