/usr/share/astk/BWidget-1.7.0/init.tcl is in code-aster-gui 1.8.4-5.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | if { $tcl_platform(platform) == "windows" } {
option add *Listbox.background SystemWindow widgetDefault
option add *ListBox.background SystemWindow widgetDefault
option add *Button.padY 0 widgetDefault
option add *ButtonBox.padY 0 widgetDefault
option add *Dialog.padY 0 widgetDefault
option add *Dialog.anchor e widgetDefault
} else {
option add *Scrollbar.width 12 widgetDefault
option add *Scrollbar.borderWidth 1 widgetDefault
option add *Dialog.separator 1 widgetDefault
option add *MainFrame.relief raised widgetDefault
option add *MainFrame.separator none widgetDefault
}
option read [file join $::BWIDGET::LIBRARY "lang" "en.rc"]
bind Entry <<TraverseIn>> { %W selection range 0 end; %W icursor end }
bind all <Key-Tab> { Widget::traverseTo [Widget::focusNext %W] }
bind all <Shift-Key-Tab> { Widget::traverseTo [Widget::focusPrev %W] }
|