diff options
Diffstat (limited to 'lib/choose_repository.tcl')
| -rw-r--r-- | lib/choose_repository.tcl | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lib/choose_repository.tcl b/lib/choose_repository.tcl index e71ec1732d..866161548b 100644 --- a/lib/choose_repository.tcl +++ b/lib/choose_repository.tcl @@ -35,7 +35,7 @@ field readtree_err ; # Error output from read-tree (if any) field sorted_recent ; # recent repositories (sorted) constructor pick {} { - global M1T M1B use_ttk + global M1T M1B if {[set maxrecent [get_config gui.maxrecentrepo]] eq {}} { set maxrecent 10 @@ -378,7 +378,6 @@ proc _objdir {path} { ## Create New Repository method _do_new {} { - global use_ttk $w_next conf \ -state disabled \ -command [cb _do_new2] \ @@ -462,7 +461,6 @@ proc _new_ok {p} { ## Clone Existing Repository method _do_clone {} { - global use_ttk $w_next conf \ -state disabled \ -command [cb _do_clone2] \ |