arcadia 0.8.1 → 0.9.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (163) hide show
  1. data/README +28 -22
  2. data/bin/arcadia +3 -3
  3. data/conf/arcadia.conf +87 -36
  4. data/conf/arcadia.res.rb +143 -5
  5. data/conf/theme-dark.conf +94 -0
  6. data/conf/theme-dark.res.rb +218 -0
  7. data/ext/ae-breakpoints/ae-breakpoints.rb +1 -0
  8. data/ext/ae-dir-projects/ae-dir-projects.rb +37 -9
  9. data/ext/ae-editor/ae-editor.conf +10 -9
  10. data/ext/ae-editor/ae-editor.rb +306 -127
  11. data/ext/ae-editor/langs/pers.lang.bind +1 -0
  12. data/ext/ae-editor/langs/rb.lang +6 -6
  13. data/ext/ae-editor/langs/tcl.lang +3 -0
  14. data/ext/ae-file-history/ae-file-history.rb +4 -11
  15. data/ext/ae-output/ae-output.rb +57 -38
  16. data/ext/ae-rad/ae-rad-inspector.rb +1 -1
  17. data/ext/ae-rad/ae-rad-palette.rb +2 -2
  18. data/ext/ae-rad/ae-rad.rb +7 -7
  19. data/ext/ae-rad/lib/tk/al-tk.rb +3 -3
  20. data/ext/ae-rad/lib/tk/al-tkcustom.rb +2 -2
  21. data/ext/ae-ruby-debug/ae-ruby-debug.conf +20 -1
  22. data/ext/ae-ruby-debug/ae-ruby-debug.rb +69 -65
  23. data/ext/ae-search-in-files/ae-search-in-files.rb +2 -17
  24. data/ext/ae-shell/ae-shell.conf +7 -6
  25. data/ext/ae-shell/ae-shell.rb +211 -32
  26. data/ext/ae-subprocess-inspector/ae-subprocess-inspector.conf +11 -0
  27. data/ext/ae-subprocess-inspector/ae-subprocess-inspector.rb +109 -0
  28. data/lib/a-commons.rb +74 -16
  29. data/lib/a-contracts.rb +18 -1
  30. data/lib/a-core.rb +410 -77
  31. data/lib/a-tkcommons.rb +338 -138
  32. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ArrowButton.html +0 -0
  33. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/BWidget.html +2 -2
  34. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/Button.html +0 -0
  35. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ButtonBox.html +0 -0
  36. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ComboBox.html +0 -0
  37. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/Dialog.html +0 -0
  38. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/DragSite.html +0 -0
  39. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/DropSite.html +0 -0
  40. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/DynamicHelp.html +0 -0
  41. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/Entry.html +0 -0
  42. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/Label.html +0 -0
  43. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/LabelEntry.html +0 -0
  44. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/LabelFrame.html +0 -0
  45. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ListBox.html +1 -4
  46. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/MainFrame.html +0 -0
  47. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/MessageDlg.html +0 -0
  48. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/NoteBook.html +0 -0
  49. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/PagesManager.html +0 -0
  50. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/PanedWindow.html +0 -0
  51. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/PanelFrame.html +0 -0
  52. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/PasswdDlg.html +0 -0
  53. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ProgressBar.html +0 -0
  54. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ProgressDlg.html +0 -0
  55. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ScrollView.html +0 -0
  56. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ScrollableFrame.html +0 -0
  57. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/ScrolledWindow.html +0 -0
  58. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/SelectColor.html +0 -0
  59. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/SelectFont.html +0 -0
  60. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/Separator.html +0 -0
  61. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/SpinBox.html +0 -0
  62. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/StatusBar.html +0 -0
  63. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/TitleFrame.html +0 -0
  64. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/Tree.html +0 -0
  65. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/Widget.html +0 -0
  66. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/contents.html +0 -0
  67. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/index.html +0 -0
  68. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/navtree.html +0 -0
  69. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/BWman/options.htm +0 -0
  70. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/CHANGES.txt +0 -0
  71. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/ChangeLog +70 -0
  72. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/LICENSE.txt +0 -0
  73. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/README.txt +0 -0
  74. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/arrow.tcl +0 -0
  75. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/bitmap.tcl +0 -0
  76. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/button.tcl +0 -0
  77. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/buttonbox.tcl +0 -0
  78. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/color.tcl +0 -0
  79. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/combobox.tcl +4 -4
  80. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/basic.tcl +0 -0
  81. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/bwidget.xbm +0 -0
  82. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/demo.tcl +0 -0
  83. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/dnd.tcl +0 -0
  84. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/manager.tcl +0 -0
  85. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/select.tcl +0 -0
  86. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/tmpldlg.tcl +0 -0
  87. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/tree.tcl +0 -0
  88. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/demo/x1.xbm +0 -0
  89. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/dialog.tcl +0 -0
  90. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/dragsite.tcl +0 -0
  91. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/dropsite.tcl +0 -0
  92. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/dynhelp.tcl +25 -18
  93. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/entry.tcl +0 -0
  94. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/font.tcl +0 -0
  95. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/bold.gif +0 -0
  96. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/copy.gif +0 -0
  97. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/cut.gif +0 -0
  98. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/dragfile.gif +0 -0
  99. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/dragicon.gif +0 -0
  100. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/error.gif +0 -0
  101. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/file.gif +0 -0
  102. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/folder.gif +0 -0
  103. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/hourglass.gif +0 -0
  104. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/info.gif +0 -0
  105. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/italic.gif +0 -0
  106. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/minus.xbm +0 -0
  107. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/new.gif +0 -0
  108. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/opcopy.xbm +0 -0
  109. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/open.gif +0 -0
  110. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/openfold.gif +0 -0
  111. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/oplink.xbm +0 -0
  112. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/opmove.xbm +0 -0
  113. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/overstrike.gif +0 -0
  114. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/palette.gif +0 -0
  115. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/passwd.gif +0 -0
  116. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/paste.gif +0 -0
  117. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/plus.xbm +0 -0
  118. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/print.gif +0 -0
  119. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/question.gif +0 -0
  120. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/redo.gif +0 -0
  121. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/save.gif +0 -0
  122. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/target.xbm +0 -0
  123. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/underline.gif +0 -0
  124. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/undo.gif +0 -0
  125. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/images/warning.gif +0 -0
  126. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/init.tcl +0 -0
  127. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/label.tcl +0 -0
  128. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/labelentry.tcl +0 -0
  129. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/labelframe.tcl +0 -0
  130. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/lang/da.rc +0 -0
  131. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/lang/de.rc +0 -0
  132. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/lang/en.rc +0 -0
  133. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/lang/es.rc +0 -0
  134. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/lang/fr.rc +0 -0
  135. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/lang/hu.rc +0 -0
  136. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/lang/nl.rc +0 -0
  137. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/lang/no.rc +0 -0
  138. data/tcl/BWidget-1.9.2/lang/pl.rc +104 -0
  139. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/listbox.tcl +68 -35
  140. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/mainframe.tcl +0 -0
  141. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/messagedlg.tcl +0 -0
  142. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/notebook.tcl +2 -2
  143. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/pagesmgr.tcl +0 -0
  144. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/panedw.tcl +0 -0
  145. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/panelframe.tcl +0 -0
  146. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/passwddlg.tcl +0 -0
  147. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/pkgIndex.tcl +2 -2
  148. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/progressbar.tcl +0 -0
  149. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/progressdlg.tcl +0 -0
  150. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/scrollframe.tcl +0 -0
  151. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/scrollview.tcl +0 -0
  152. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/scrollw.tcl +0 -0
  153. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/separator.tcl +0 -0
  154. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/spinbox.tcl +0 -0
  155. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/statusbar.tcl +0 -0
  156. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/tests/entry.test +0 -0
  157. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/titleframe.tcl +0 -0
  158. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/tree.tcl +6 -1
  159. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/utils.tcl +27 -7
  160. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/widget.tcl +0 -0
  161. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/wizard.tcl +0 -0
  162. data/tcl/{BWidget-1.9.0 → BWidget-1.9.2}/xpm2image.tcl +0 -0
  163. metadata +162 -153
@@ -174,10 +174,10 @@ Description text
174
174
  <I>h</I>
175
175
  ?<I>arg...</I>?
176
176
  </DT><DD>
177
- Used to position and resise the widget specified by
177
+ Used to position and resize the widget specified by
178
178
  <I>path</I>. <I>w</I> and <I>h</I> are used to specify the requested
179
179
  width and height of the <I>path</I> widget for use by <B>wm
180
- geometry</B>. The placement of the widget relative to other widgets or
180
+ geometry</B> (set to 0 to use current values). The placement of the widget relative to other widgets or
181
181
  the screen is controlled by additional arguments:
182
182
  <DL>
183
183
  <DT><B>at</B> <I>x</I> <I>y</I></DT>
@@ -665,10 +665,7 @@ Standard command to enable vertical scrolling of <I>pathName</I>.
665
665
 
666
666
  <p>
667
667
  A <b>&lt;&lt;ListboxSelect&gt;&gt;</b> virtual event is generated any time the
668
- selection in the listbox changes. This is the default behavior of an
669
- item in the listbox, but it can be overridden with the bindText or
670
- bindImage command. If the button 1 binding is overridden, this event may
671
- not be generated.
668
+ selection in the listbox changes.
672
669
  </p>
673
670
 
674
671
  <p>
@@ -1,3 +1,73 @@
1
+ 2010-06-09 Harald Oehlmann <oehhar@users.sourceforge.net>
2
+
3
+ * Included lang/pl.rc from HEAD.
4
+
5
+ 2010-06-07 Harald Oehlmann <oehhar@users.sourceforge.net>
6
+
7
+ **** BWidget 1.9.2 tagged ****
8
+ Version 1.9.1 was skipped.
9
+ This was released in ActiveTCL and thus may exist on many
10
+ installations.
11
+
12
+ 2010-05-31 Harald Oehlmann <oehhar@users.sourceforge.net>
13
+
14
+ * listbox.html Reflected patch 2010-05-12 in documentation.
15
+ The selection may not be disabled any more by binding button 1.
16
+
17
+ 2010-05-12 Harald Oehlmann <oehhar@users.sourceforge.net>
18
+
19
+ * listbox.tcl(ListBox::bindText and ListBox::bindImage)
20
+ Method bindText and bindImage overwrote internal selection
21
+ bindings [Bug 3000293] reported by Robert Karen.
22
+
23
+ 2010-05-11 Harald Oehlmann <oehhar@users.sourceforge.net>
24
+
25
+ * listbox.tcl(ListBox::see) Method see shifts image out of
26
+ view. Showed up, by a selection click on a long item with icon
27
+ [Bug 2999764] reported by Robert Karen.
28
+
29
+ 2010-05-05 Harald Oehlmann <oehhar@users.sourceforge.net>
30
+
31
+ * listbox.tcl(ListBox::_configureSelectmode) Drag modifies
32
+ multiple selection [Bug 2995969] reported by Robert Karen.
33
+ Bound events on ButtonRelease-1 instead Button-1 for multiple
34
+ selections to avoid bug.
35
+ * listbox.tcl(ListBox::_drag_and_drop) The default drag and drop
36
+ routine only handled single drag and drop.
37
+ It was extended to handle also drag and drop of multiple entries.
38
+
39
+ 2009-09-03 Harald Oehlmann <oehhar@users.sourceforge.net>
40
+
41
+ * util.tcl(BWidget::place), BWidget.html Widget placed incorrectly,
42
+ when bigger than current screen [Bug 2850031] by Thomas Grausgruber
43
+ Possible incompatibility: BWidget::place w h -> w,h are reduced to
44
+ screen width.
45
+
46
+ 2009-08-12 Harald Oehlmann <oehhar@users.sourceforge.net>
47
+
48
+ * dynhelp.tcl Use balloon help font TkTooltipFont if tk <= 8.5.
49
+ Otherwise use helvetica 11 on Aqua [Patch 2835180] for Kevin Walzer
50
+ * dynhelp.tcl(DynamicHelp::_show_help)Replaced aqua conditional code
51
+ check by $Widget::_aqua
52
+
53
+ 2009-08-10 Harald Oehlmann <oehhar@users.sourceforge.net>
54
+
55
+ * notebook.tcl (NoteBook::delete) Method delete destroyframe=1 and
56
+ reinsertion -> raise failed - state variables were deleted.
57
+ [Bug 2831785] by kjnash
58
+ * tree.tcl (Tree::_keynav) Fire virtual event <<TreeSelect>> also on
59
+ keyboard navigation [Patch 2828086] by Kevin Walzer
60
+ * combobox.tcl Replaced aqua conditional code check by $Widget::_aqua
61
+
62
+ 2009-08-10 Harald Oehlmann <oehhar@users.sourceforge.net>
63
+
64
+ **** Branched to bwidget ****
65
+
66
+ This is the bwidget branch of module bwidget of tcllib
67
+ Use "-r bwidget" for all cvs operations
68
+ Scope: Package BWidget compatible to tcl/tk 8.1 and tk
69
+ (e.g. no tile/ttk).
70
+
1
71
  2009-07-24 Harald Oehlmann <oehhar@users.sourceforge.net>
2
72
 
3
73
  **** BWidget 1.9.0 tagged ****
@@ -1,7 +1,7 @@
1
1
  # ----------------------------------------------------------------------------
2
2
  # combobox.tcl
3
3
  # This file is part of Unifix BWidget Toolkit
4
- # $Id: combobox.tcl,v 1.42 2009/07/07 17:28:14 oehhar Exp $
4
+ # $Id: combobox.tcl,v 1.42.2.1 2009/08/10 11:28:50 oehhar Exp $
5
5
  # ----------------------------------------------------------------------------
6
6
  # Index of commands:
7
7
  # - ComboBox::create
@@ -468,7 +468,7 @@ proc ComboBox::_create_popup { path } {
468
468
  wm withdraw $shell
469
469
  wm overrideredirect $shell 1
470
470
  # these commands cause the combobox to behave strangely on OS X
471
- if {![string equal [tk windowingsystem] "aqua"]} {
471
+ if {! $Widget::_aqua } {
472
472
  update idle
473
473
  wm transient $shell [winfo toplevel $path]
474
474
  catch { wm attributes $shell -topmost 1 }
@@ -633,7 +633,7 @@ proc ComboBox::_mapliste { path } {
633
633
  wm deiconify $path.shell
634
634
  raise $path.shell
635
635
  BWidget::focus set $listb
636
- if { ! [string equal [tk windowingsystem] "aqua"] } {
636
+ if {! $Widget::_aqua } {
637
637
  BWidget::grab global $path
638
638
  }
639
639
  }
@@ -647,7 +647,7 @@ proc ComboBox::_unmapliste { path {refocus 1} } {
647
647
  if {[winfo exists $path.shell] && \
648
648
  ( [string equal [wm state $path.shell] "normal"] ||
649
649
  [string equal [wm state $path.shell] "zoomed"] ) } {
650
- if {![string equal [tk windowingsystem] "aqua"]} {
650
+ if {! $Widget::_aqua } {
651
651
  BWidget::grab release $path
652
652
  BWidget::focus release $path.shell.listb $refocus
653
653
  # Update now because otherwise [focus -force...] makes the app hang!
@@ -1,7 +1,7 @@
1
1
  # ----------------------------------------------------------------------------
2
2
  # dynhelp.tcl
3
3
  # This file is part of Unifix BWidget Toolkit
4
- # $Id: dynhelp.tcl,v 1.20 2009/07/15 16:50:16 oehhar Exp $
4
+ # $Id: dynhelp.tcl,v 1.20.2.1 2009/08/12 07:20:21 oehhar Exp $
5
5
  # ----------------------------------------------------------------------------
6
6
  # Index of commands:
7
7
  # - DynamicHelp::configure
@@ -19,23 +19,31 @@
19
19
  namespace eval DynamicHelp {
20
20
  Widget::define DynamicHelp dynhelp -classonly
21
21
 
22
- Widget::declare DynamicHelp {
23
- {-foreground TkResource black 0 label}
24
- {-topbackground TkResource black 0 {label -foreground}}
25
- {-background TkResource "#FFFFC0" 0 label}
26
- {-borderwidth TkResource 1 0 label}
27
- {-justify TkResource left 0 label}
28
- {-font TkResource "helvetica 8" 0 label}
29
- {-delay Int 600 0 "%d >= 100 & %d <= 2000"}
30
- {-state Enum "normal" 0 {normal disabled}}
31
- {-padx TkResource 1 0 label}
32
- {-pady TkResource 1 0 label}
33
- {-bd Synonym -borderwidth}
34
- {-bg Synonym -background}
35
- {-fg Synonym -foreground}
36
- {-topbg Synonym -topbackground}
22
+ if {$::tcl_version >= 8.5} {
23
+ set fontdefault TkTooltipFont
24
+ } elseif {$Widget::_aqua} {
25
+ set fontdefault {helvetica 11}
26
+ } else {
27
+ set fontdefault {helvetica 8}
37
28
  }
38
29
 
30
+ Widget::declare DynamicHelp [list\
31
+ {-foreground TkResource black 0 label}\
32
+ {-topbackground TkResource black 0 {label -foreground}}\
33
+ {-background TkResource "#FFFFC0" 0 label}\
34
+ {-borderwidth TkResource 1 0 label}\
35
+ {-justify TkResource left 0 label}\
36
+ [list -font TkResource $fontdefault 0 label]\
37
+ {-delay Int 600 0 "%d >= 100 & %d <= 2000"}\
38
+ {-state Enum "normal" 0 {normal disabled}}\
39
+ {-padx TkResource 1 0 label}\
40
+ {-pady TkResource 1 0 label}\
41
+ {-bd Synonym -borderwidth}\
42
+ {-bg Synonym -background}\
43
+ {-fg Synonym -foreground}\
44
+ {-topbg Synonym -topbackground}\
45
+ ]
46
+
39
47
  proc use {} {}
40
48
 
41
49
  variable _registered
@@ -662,8 +670,7 @@ proc DynamicHelp::_show_help { path w x y } {
662
670
  -screen [winfo screen $w]
663
671
 
664
672
  wm withdraw $_top
665
- if {$::tk_version >= 8.4
666
- && [string equal [tk windowingsystem] "aqua"]} {
673
+ if { $Widget::_aqua } {
667
674
  ::tk::unsupported::MacWindowStyle style $_top help none
668
675
  } else {
669
676
  wm overrideredirect $_top 1
@@ -0,0 +1,104 @@
1
+ ! ------------------------------------------------------------------------------
2
+
3
+ ! pl.rc
4
+
5
+ ! This file is part of Unifix BWidget Toolkit
6
+
7
+ ! Definition of english resources
8
+
9
+ ! ------------------------------------------------------------------------------
10
+
11
+
12
+
13
+
14
+
15
+ ! --- symbolic names of buttons ------------------------------------------------
16
+
17
+
18
+
19
+ *abortName: &Porzuć
20
+
21
+ *retryName: P&onów
22
+
23
+ *ignoreName: &Ignoruj
24
+
25
+ *okName: &OK
26
+
27
+ *cancelName: &Anyluj
28
+
29
+ *yesName: &Tak
30
+
31
+ *noName: &Nie
32
+
33
+
34
+
35
+
36
+
37
+ ! --- symbolic names of label of SelectFont dialog ----------------------------
38
+
39
+
40
+
41
+ *boldName: Pogrubiona
42
+
43
+ *italicName: Kursywa
44
+
45
+ *underlineName: Podkreślenie
46
+
47
+ *overstrikeName: Przekreślenie
48
+
49
+ *fontName: &Czcionka:
50
+
51
+ *sizeName: &Rozmiar:
52
+
53
+ *styleName: St&yl czcionki:
54
+
55
+
56
+
57
+
58
+
59
+ ! --- symbolic names of label of PasswdDlg dialog -----------------------------
60
+
61
+
62
+
63
+ *loginName: &Login
64
+
65
+ *passwordName: &Hasło
66
+
67
+
68
+
69
+
70
+
71
+ ! --- resource for SelectFont dialog ------------------------------------------
72
+
73
+
74
+
75
+ *SelectFont.title: Wybór czcionki
76
+
77
+ *SelectFont.sampletext: Przykładowy tekst
78
+
79
+
80
+
81
+
82
+
83
+ ! --- resource for MessageDlg dialog ------------------------------------------
84
+
85
+
86
+
87
+ *MessageDlg.noneTitle: Wiadomość
88
+
89
+ *MessageDlg.infoTitle: Informacja
90
+
91
+ *MessageDlg.questionTitle: Pytanie
92
+
93
+ *MessageDlg.warningTitle: Ostrzeżenie
94
+
95
+ *MessageDlg.errorTitle: Błąd
96
+
97
+
98
+
99
+ ! --- resource for PasswdDlg dialog -------------------------------------------
100
+
101
+
102
+
103
+ *PasswdDlg.title: Wpisz login i hasło
104
+