| 1 | if {[catch {package require Tcl}]} return |
|---|
| 2 | package ifneeded BWidget 1.2.1 "\ |
|---|
| 3 | package require Tk 8.0;\ |
|---|
| 4 | [list tclPkgSetup $dir BWidget 1.2.1 { |
|---|
| 5 | {arrow.tcl source {ArrowButton ArrowButton::create ArrowButton::use}} |
|---|
| 6 | {labelframe.tcl source {LabelFrame LabelFrame::create LabelFrame::use}} |
|---|
| 7 | {labelentry.tcl source {LabelEntry LabelEntry::create LabelEntry::use}} |
|---|
| 8 | {bitmap.tcl source {Bitmap::get Bitmap::use}} |
|---|
| 9 | {button.tcl source {Button Button::create Button::use}} |
|---|
| 10 | {buttonbox.tcl source {ButtonBox ButtonBox::create ButtonBox::use}} |
|---|
| 11 | {combobox.tcl source {ComboBox ComboBox::create ComboBox::use}} |
|---|
| 12 | {label.tcl source {Label Label::create Label::use}} |
|---|
| 13 | {entry.tcl source {Entry Entry::create Entry::use}} |
|---|
| 14 | {pagesmgr.tcl source {PagesManager PagesManager::create PagesManager::use}} |
|---|
| 15 | {notebook.tcl source {NoteBook NoteBook::create NoteBook::use}} |
|---|
| 16 | {panedw.tcl source {PanedWindow PanedWindow::create PanedWindow::use}} |
|---|
| 17 | {scrollw.tcl source {ScrolledWindow ScrolledWindow::create ScrolledWindow::use}} |
|---|
| 18 | {scrollview.tcl source {ScrollView ScrollView::create ScrollView::use}} |
|---|
| 19 | {scrollframe.tcl source {ScrollableFrame ScrollableFrame::create ScrollableFrame::use}} |
|---|
| 20 | {progressbar.tcl source {ProgressBar ProgressBar::create ProgressBar::use}} |
|---|
| 21 | {progressdlg.tcl source {ProgressDlg ProgressDlg::create ProgressDlg::use}} |
|---|
| 22 | {passwddlg.tcl source {PasswdDlg PasswdDlg::create PasswdDlg::use}} |
|---|
| 23 | {dragsite.tcl source {DragSite::register DragSite::include DragSite::use}} |
|---|
| 24 | {dropsite.tcl source {DropSite::register DropSite::include DropSite::use}} |
|---|
| 25 | {separator.tcl source {Separator Separator::create Separator::use}} |
|---|
| 26 | {spinbox.tcl source {SpinBox SpinBox::create SpinBox::use}} |
|---|
| 27 | {titleframe.tcl source {TitleFrame TitleFrame::create TitleFrame::use}} |
|---|
| 28 | {mainframe.tcl source {MainFrame MainFrame::create MainFrame::use}} |
|---|
| 29 | {listbox.tcl source {ListBox ListBox::create ListBox::use}} |
|---|
| 30 | {tree.tcl source {Tree Tree::create Tree::use}} |
|---|
| 31 | {color.tcl source {SelectColor SelectColor::create SelectColor::use SelectColor::setcolor}} |
|---|
| 32 | {dynhelp.tcl source {DynamicHelp::configure DynamicHelp::use DynamicHelp::register DynamicHelp::include}} |
|---|
| 33 | {dialog.tcl source {Dialog Dialog::create Dialog::use}} |
|---|
| 34 | {messagedlg.tcl source {MessageDlg MessageDlg::create MessageDlg::use}} |
|---|
| 35 | {font.tcl source {SelectFont SelectFont::create SelectFont::use SelectFont::loadfont}} |
|---|
| 36 | {widgetdoc.tcl source {Widget::generate-doc Widget::generate-widget-doc}} |
|---|
| 37 | {xpm2image.tcl source {xpm-to-image}} |
|---|
| 38 | }]; \ |
|---|
| 39 | [list set env(BWIDGET_LIBRARY) $dir]; \ |
|---|
| 40 | [list source [file join $dir widget.tcl]]; \ |
|---|
| 41 | [list source [file join $dir init.tcl]]; \ |
|---|
| 42 | [list source [file join $dir utils.tcl]]; \ |
|---|
| 43 | " |
|---|
