← Back to branch summary

~ubuntu-branches/ubuntu/gutsy/tk8.4/gutsy-updates

« back to all changes in this revision

Viewing changes to library/choosedir.tcl

  • Committer: Bazaar Package Importer
  • Author(s): Chris Waters
  • Date: 2005-09-06 14:35:13 UTC
  • mfrom: (1.1.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20050906143513-7ns3rwufmpiq871b
Tags: 8.4.11-1
* New upstream release.
* Needed to fix mechanism for picking up SONAME.  Now uses special
  macro, TK_SHLIB_LD_EXTRAS, and only for Linux, Hurd and DebianBSD.
* Fixed some possible-bashisms in preinst.

Show diffs side-by-side

added added

removed removed

Lines of Context:
library/choosedir.tcl
5
5
# Copyright (c) 1998-2000 by Scriptics Corporation.
6
6
# All rights reserved.
7
7
# 
8
 
# RCS: @(#) $Id: choosedir.tcl,v 1.15 2002/07/22 21:25:39 mdejong Exp $
 
8
# RCS: @(#) $Id: choosedir.tcl,v 1.15.2.1 2005/04/12 20:33:35 hobbs Exp $
9
9
 
10
10
# Make sure the tk::dialog namespace, in which all dialogs should live, exists
11
11
namespace eval ::tk::dialog {}
13
13
 
14
14
# Make the chooseDir namespace inside the dialog namespace
15
15
namespace eval ::tk::dialog::file::chooseDir {
16
 
    namespace import ::tk::msgcat::*
 
16
    namespace import -force ::tk::msgcat::*
17
17
}
18
18
 
19
19
# ::tk::dialog::file::chooseDir:: --
49
49
        set data(icons) $w.icons
50
50
        set data(ent) $w.f2.ent
51
51
        set data(okBtn) $w.f2.ok
52
 
        set data(cancelBtn) $w.f3.cancel
 
52
        set data(cancelBtn) $w.f2.cancel
 
53
        set data(hiddenBtn) $w.f2.hidden
 
54
    }
 
55
    if {$::tk::dialog::file::showHiddenBtn} {
 
56
        $data(hiddenBtn) configure -state normal
 
57
        grid $data(hiddenBtn)
 
58
    } else {
 
59
        $data(hiddenBtn) configure -state disabled
 
60
        grid remove $data(hiddenBtn)
53
61
    }
54
62
 
55
63
    # Dialog boxes should be transient with respect to their parent,