Bwidget Source Code
Check-in [97be7a20ab]
Not logged in
Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2019 Conference, Houston/TX, US, Nov 4-8
Send your abstracts to tclconference@googlegroups.com
or submit via the online form by Sep 9.

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Restore version to 1.9.10
Timelines: family | ancestors | descendants | both | bug-c86207db01fc9ce0
Files: files | file ages | folders
SHA1:97be7a20abe10794cf5b36f54d0e6e9e1445ebbb
User & Date: adrianmedranocalvo 2016-07-15 07:21:54
Context
2016-07-15
11:19
pckIndex.tcl: auto-load commands also from global namespace and not only from BWidget namespace. Ticket [c86207db01] check-in: b8dc4b393d user: oehhar tags: bwidget
07:21
Restore version to 1.9.10 Leaf check-in: 97be7a20ab user: adrianmedranocalvo tags: bug-c86207db01fc9ce0
2016-07-12
18:23
Canonicalize name of auto_loaded commands.

Top-level commands should not have leading ::, but all others rest should. See auto_qualify commentary in Tcl's init.tcl.

See bug [c86207db01fc9ce0]. check-in: e49079d49e user: adrianmedranocalvo tags: bug-c86207db01fc9ce0

Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to pkgIndex.tcl.

1
2
3
4
5
6
7
8
9
10
11
12
13
if {[catch {package require Tcl}]} return
# NOTE: auto_loaded top-level commands shall not be qualified (no leading ::)
# but all others should.  See auto_qualify for details.
package ifneeded BWidget 1.9.9 "\
    package require Tk 8.1.1;\
    [list tclPkgSetup $dir BWidget 1.9.9 {
	{arrow.tcl       source {ArrowButton ::ArrowButton::create ::ArrowButton::use}}
	{labelframe.tcl  source {LabelFrame ::LabelFrame::create ::LabelFrame::use}}
	{labelentry.tcl  source {LabelEntry ::LabelEntry::create ::LabelEntry::use}}
	{bitmap.tcl      source {::Bitmap::get ::Bitmap::use}}
	{button.tcl      source {Button ::Button::create ::Button::use}}
	{buttonbox.tcl   source {ButtonBox ::ButtonBox::create ::ButtonBox::use}}
	{combobox.tcl    source {ComboBox ::ComboBox::create ::ComboBox::use}}



|

|







1
2
3
4
5
6
7
8
9
10
11
12
13
if {[catch {package require Tcl}]} return
# NOTE: auto_loaded top-level commands shall not be qualified (no leading ::)
# but all others should.  See auto_qualify for details.
package ifneeded BWidget 1.9.10 "\
    package require Tk 8.1.1;\
    [list tclPkgSetup $dir BWidget 1.9.10 {
	{arrow.tcl       source {ArrowButton ::ArrowButton::create ::ArrowButton::use}}
	{labelframe.tcl  source {LabelFrame ::LabelFrame::create ::LabelFrame::use}}
	{labelentry.tcl  source {LabelEntry ::LabelEntry::create ::LabelEntry::use}}
	{bitmap.tcl      source {::Bitmap::get ::Bitmap::use}}
	{button.tcl      source {Button ::Button::create ::Button::use}}
	{buttonbox.tcl   source {ButtonBox ::ButtonBox::create ::ButtonBox::use}}
	{combobox.tcl    source {ComboBox ::ComboBox::create ::ComboBox::use}}