[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Help-smalltalk] [PATCH 09/15] gtktools: Introduce a GTKTools package wi
|
From: |
Holger Hans Peter Freyther |
|
Subject: |
[Help-smalltalk] [PATCH 09/15] gtktools: Introduce a GTKTools package with helper classes |
|
Date: |
Mon, 8 Apr 2013 11:30:25 +0200 |
From: Holger Hans Peter Freyther <address@hidden>
VisualGST has accumulated some GTK support that makes creating
widgets with GTK more easy. Begin to move these widgets from the
VisualGST package to the new GTKTools.
2013-03-30 Holger Hans Peter Freyther <address@hidden>
* configure.ac: Introduce the GTKTools package
2013-03-30 Holger Hans Peter Freyther <address@hidden>
* GtkAbstractConcreteWidget.st: Renamed from
packages/visualgst/GtkAbstractConcreteWidget.st.
* GtkConcreteWidget.st: Renamed from
packages/visualgst/GtkConcreteWidget.st.
* GtkEntryDialog.st: Renamed from packages/visualgst/GtkEntryDialog.st.
* GtkMainWindow.st: Renamed from packages/visualgst/GtkMainWindow.st.
* Tests/GtkConcreteWidgetTest.st: Renamed from
packages/visualgst/Tests/GtkConcreteWidgetTest.st.
* package.xml: Added.
2013-03-30 Holger Hans Peter Freyther <address@hidden>
* Commands/CategoryMenus/AddCategoryCommand.st: Use GTKTools namespace.
* Commands/CategoryMenus/RenameCategoryCommand.st: Use GTKTools
namespace.
* Commands/ClassMenus/AddClassCommand.st: Use GTKTools namespace.
* Commands/ClassMenus/RenameClassCommand.st: Use GTKTools namespace.
* Commands/NamespaceMenus/AddNamespaceCommand.st: Use GTKTools
namespace.
* Commands/NamespaceMenus/RenameNamespaceCommand.st: Use GTKTools
namespace.
* Debugger/GtkContextWidget.st: Use GTKTools namespace.
* Debugger/GtkStackInspectorView.st: Use GTKTools namespace.
* GtkEntryWidget.st: Use GTKTools namespace.
* GtkHistoryWidget.st: Use GTKTools namespace.
* GtkNotebookWidget.st: Use GTKTools namespace.
* GtkPackageBuilderWidget.st: Use GTKTools namespace.
* GtkScrollTreeWidget.st: Use GTKTools namespace.
* GtkSidebarWidget.st: Use GTKTools namespace.
* GtkVariableTrackerWidget.st: Use GTKTools namespace.
* GtkVisualGSTTool.st: Use GTKTools namespace.
* Image/GtkImageWidget.st: Use GTKTools namespace.
* Implementors/GtkImageResultsWidget.st: Use GTKTools namespace.
* Inspector/GtkInspectorBrowserWidget.st: Use GTKTools namespace.
* Inspector/GtkInspectorWidget.st: Use GTKTools namespace.
* SUnit/GtkSUnitResultWidget.st: Use GTKTools namespace.
* StBrowser/GtkCategorizedClassWidget.st: Use GTKTools namespace.
* StBrowser/GtkCategorizedNamespaceWidget.st: Use GTKTools namespace.
* StBrowser/GtkCategoryWidget.st: Use GTKTools namespace.
* StBrowser/GtkClassBrowserWidget.st: Use GTKTools namespace.
* StBrowser/GtkClassHierarchyWidget.st: Use GTKTools namespace.
* StBrowser/GtkMethodWidget.st: Use GTKTools namespace.
* Tetris/Tetris.st: Use GTKTools namespace.
* Text/GtkTextPluginWidget.st: Use GTKTools namespace.
* Text/GtkTextWidget.st: Use GTKTools namespace.
* package.xml: Use GTKTools namespace.
* GtkAbstractConcreteWidget.st: Renamed to
packages/gtktools/GtkAbstractConcreteWidget.st.
* GtkConcreteWidget.st: Renamed to
packages/gtktools/GtkConcreteWidget.st.
* GtkEntryDialog.st: Renamed to packages/gtktools/GtkEntryDialog.st.
* GtkMainWindow.st: Renamed to packages/gtktools/GtkMainWindow.st.
* Tests/GtkConcreteWidgetTest.st: Renamed to
packages/gtktools/Tests/GtkConcreteWidgetTest.st.
---
.gitignore | 1 +
ChangeLog | 4 +
configure.ac | 1 +
packages/gtktools/ChangeLog | 8 +
packages/gtktools/GtkAbstractConcreteWidget.st | 5 +
packages/gtktools/GtkConcreteWidget.st | 122 +++++++++
packages/gtktools/GtkEntryDialog.st | 65 +++++
packages/gtktools/GtkMainWindow.st | 276 ++++++++++++++++++++
packages/gtktools/Makefile.frag | 5 +
packages/gtktools/Tests/GtkConcreteWidgetTest.st | 42 +++
packages/gtktools/package.xml | 17 ++
packages/visualgst/ChangeLog | 39 +++
.../Commands/CategoryMenus/AddCategoryCommand.st | 2 +-
.../CategoryMenus/RenameCategoryCommand.st | 2 +-
.../Commands/ClassMenus/AddClassCommand.st | 2 +-
.../Commands/ClassMenus/RenameClassCommand.st | 2 +-
.../Commands/NamespaceMenus/AddNamespaceCommand.st | 2 +-
.../NamespaceMenus/RenameNamespaceCommand.st | 2 +-
packages/visualgst/Debugger/GtkContextWidget.st | 2 +-
.../visualgst/Debugger/GtkStackInspectorView.st | 2 +-
packages/visualgst/GtkAbstractConcreteWidget.st | 6 -
packages/visualgst/GtkConcreteWidget.st | 122 ---------
packages/visualgst/GtkEntryDialog.st | 66 -----
packages/visualgst/GtkEntryWidget.st | 2 +-
packages/visualgst/GtkHistoryWidget.st | 2 +-
packages/visualgst/GtkMainWindow.st | 276 --------------------
packages/visualgst/GtkNotebookWidget.st | 2 +-
packages/visualgst/GtkPackageBuilderWidget.st | 2 +-
packages/visualgst/GtkScrollTreeWidget.st | 2 +-
packages/visualgst/GtkSidebarWidget.st | 4 +-
packages/visualgst/GtkVariableTrackerWidget.st | 2 +-
packages/visualgst/GtkVisualGSTTool.st | 2 +-
packages/visualgst/Image/GtkImageWidget.st | 2 +-
.../Implementors/GtkImageResultsWidget.st | 2 +-
.../Inspector/GtkInspectorBrowserWidget.st | 2 +-
packages/visualgst/Inspector/GtkInspectorWidget.st | 2 +-
packages/visualgst/Makefile.frag | 2 +-
packages/visualgst/SUnit/GtkSUnitResultWidget.st | 2 +-
.../StBrowser/GtkCategorizedClassWidget.st | 2 +-
.../StBrowser/GtkCategorizedNamespaceWidget.st | 2 +-
packages/visualgst/StBrowser/GtkCategoryWidget.st | 2 +-
.../visualgst/StBrowser/GtkClassBrowserWidget.st | 2 +-
.../visualgst/StBrowser/GtkClassHierarchyWidget.st | 2 +-
packages/visualgst/StBrowser/GtkMethodWidget.st | 2 +-
packages/visualgst/Tests/GtkConcreteWidgetTest.st | 43 ---
packages/visualgst/Tetris/Tetris.st | 2 +-
packages/visualgst/Text/GtkTextPluginWidget.st | 2 +-
packages/visualgst/Text/GtkTextWidget.st | 2 +-
packages/visualgst/package.xml | 12 +-
49 files changed, 618 insertions(+), 556 deletions(-)
create mode 100644 packages/gtktools/ChangeLog
create mode 100644 packages/gtktools/GtkAbstractConcreteWidget.st
create mode 100644 packages/gtktools/GtkConcreteWidget.st
create mode 100644 packages/gtktools/GtkEntryDialog.st
create mode 100644 packages/gtktools/GtkMainWindow.st
create mode 100644 packages/gtktools/Makefile.frag
create mode 100644 packages/gtktools/Tests/GtkConcreteWidgetTest.st
create mode 100644 packages/gtktools/package.xml
delete mode 100644 packages/visualgst/GtkAbstractConcreteWidget.st
delete mode 100644 packages/visualgst/GtkConcreteWidget.st
delete mode 100644 packages/visualgst/GtkEntryDialog.st
delete mode 100644 packages/visualgst/GtkMainWindow.st
delete mode 100644 packages/visualgst/Tests/GtkConcreteWidgetTest.st
diff --git a/.gitignore b/.gitignore
index d0578bc..8e8fe08 100644
--- a/.gitignore
+++ b/.gitignore
@@ -62,6 +62,7 @@ packages/gtk/order
packages/gtk/sizeof
packages/gtk/sizeof.c
packages/gtk/structs
+packages/gtktools/stamp-classes
packages/i18n/ref-add.sed
packages/i18n/ref-del.sed
packages/net/gnutls-wrapper
diff --git a/ChangeLog b/ChangeLog
index 277302a..aa767b8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2013-03-30 Holger Hans Peter Freyther <address@hidden>
+
+ * configure.ac: Introduce the GTKTools package
+
2013-03-31 Holger Hans Peter Freyther <address@hidden>
* tests/stcompiler.ok: Update the test result.
diff --git a/configure.ac b/configure.ac
index 798a6a8..5305622 100644
--- a/configure.ac
+++ b/configure.ac
@@ -587,6 +587,7 @@ GST_PACKAGE_ENABLE([SUnit], [sunit])
GST_PACKAGE_ENABLE([Swazoo], [swazoo-httpd])
GST_PACKAGE_ENABLE([Sockets], [sockets], [], [gst_cv_sockets])
GST_PACKAGE_ENABLE([VFSAddOns], [vfs], [], [], [Makefile])
+GST_PACKAGE_ENABLE([GTKTools], [gtktools])
GST_PACKAGE_ENABLE([VisualGST], [visualgst])
GST_PACKAGE_ENABLE([XML-XMLNodeBuilder], [xml/builder])
GST_PACKAGE_ENABLE([XML-DOM], [xml/dom])
diff --git a/packages/gtktools/ChangeLog b/packages/gtktools/ChangeLog
new file mode 100644
index 0000000..1299e7f
--- /dev/null
+++ b/packages/gtktools/ChangeLog
@@ -0,0 +1,8 @@
+2013-03-30 Holger Hans Peter Freyther <address@hidden>
+
+ * GtkAbstractConcreteWidget.st: Renamed from
packages/visualgst/GtkAbstractConcreteWidget.st.
+ * GtkConcreteWidget.st: Renamed from
packages/visualgst/GtkConcreteWidget.st.
+ * GtkEntryDialog.st: Renamed from packages/visualgst/GtkEntryDialog.st.
+ * GtkMainWindow.st: Renamed from packages/visualgst/GtkMainWindow.st.
+ * Tests/GtkConcreteWidgetTest.st: Renamed from
packages/visualgst/Tests/GtkConcreteWidgetTest.st.
+ * package.xml: Added.
diff --git a/packages/gtktools/GtkAbstractConcreteWidget.st
b/packages/gtktools/GtkAbstractConcreteWidget.st
new file mode 100644
index 0000000..4354e1e
--- /dev/null
+++ b/packages/gtktools/GtkAbstractConcreteWidget.st
@@ -0,0 +1,5 @@
+Smalltalk.Object subclass: GtkAbstractConcreteWidget [
+
+ hideAll [
+ ]
+]
diff --git a/packages/gtktools/GtkConcreteWidget.st
b/packages/gtktools/GtkConcreteWidget.st
new file mode 100644
index 0000000..4880921
--- /dev/null
+++ b/packages/gtktools/GtkConcreteWidget.st
@@ -0,0 +1,122 @@
+GtkAbstractConcreteWidget subclass: GtkConcreteWidget [
+ | child parentWindow popupMenu |
+
+ GtkConcreteWidget class >> parentWindow: aGtkWindow [
+ <category: 'instance creation'>
+
+ ^ self new
+ parentWindow: aGtkWindow;
+ initialize;
+ yourself
+ ]
+
+ GtkConcreteWidget class >> showAll [
+ <category: 'instance creation'>
+
+ ^ self new
+ initialize;
+ showAll;
+ yourself
+ ]
+
+ initialize [
+ <category: 'initialize'>
+
+ ]
+
+ parentWindow: aGtkWindow [
+ <category: 'accessing'>
+
+ parentWindow := aGtkWindow
+ ]
+
+ parentWindow [
+ <category: 'accessing'>
+
+ ^ parentWindow
+ ]
+
+ mainWidget [
+ <category: 'accessing'>
+
+ ^ child
+ ]
+
+ mainWidget: aGtkWidget [
+ <category: 'accessing'>
+
+ child ifNotNil: [ child hideAll ].
+ child := aGtkWidget
+ ]
+
+ showAll [
+ <category: 'user interface'>
+
+ child showAll
+ ]
+
+ hideAll [
+ <category: 'user interface'>
+
+ child hideAll
+ ]
+
+ isVisible [
+ <category: 'testing'>
+
+ ^ child getVisible
+ ]
+
+ hasFocus [
+ <category: 'testing'>
+
+ | parent current |
+ parent := child.
+ [ (current := parent getFocusChild) notNil ] whileTrue: [
+ parent := current ].
+ ^ self parentWindow getFocus = parent
+
+ ]
+
+ focusedWidget [
+ <category: 'focus'>
+
+ self hasFocus ifTrue: [ ^ self ].
+ ^ nil
+ ]
+
+ onFocusPerform: aSymbol [
+ <category: 'widget'>
+
+ ^ self focusedWidget perform: aSymbol
+ ]
+
+ onPress: aGtkWidget event: aGdkEvent [
+ <category: 'button event'>
+
+ | menu aGdkButtonEvent |
+ aGdkButtonEvent := aGdkEvent castTo: GTK.GdkEventButton type.
+ aGdkButtonEvent button value = 3 ifFalse: [ ^ false ].
+ menu := popupMenu asPopupMenu.
+ menu attachToWidget: self treeView detacher: nil.
+ menu popup: nil parentMenuItem: nil func: nil data: nil button: 3
activateTime: aGdkButtonEvent time value.
+ menu showAll.
+ ^ true
+ ]
+
+ connectToWhenPopupMenu: aMenuBuilder [
+ <category: 'user interface'>
+
+ popupMenu := aMenuBuilder.
+ ^ self treeView connectSignal: 'button-press-event' to: self selector:
#'onPress:event:'
+ ]
+
+ grabFocus [
+ <category: 'user interface'>
+
+ ]
+
+ close [
+ <category: 'user interface'>
+ ]
+]
diff --git a/packages/gtktools/GtkEntryDialog.st
b/packages/gtktools/GtkEntryDialog.st
new file mode 100644
index 0000000..b45c779
--- /dev/null
+++ b/packages/gtktools/GtkEntryDialog.st
@@ -0,0 +1,65 @@
+Object subclass: GtkEntryDialog [
+ | dialog labelWidget entryWidget hasPressedOk buttons defaultButton |
+
+ GtkEntryDialog class >> title: aTitle text: aDescription [
+ <category: 'instance creation'>
+
+ ^ (self new)
+ title: aTitle text: aDescription;
+ yourself
+ ]
+
+ beOkCancel [
+ buttons := #( ('Ok' #gtkResponseOk) ('Cancel' #gtkResponseCancel))
+ ]
+
+ beYesNo [
+ buttons := #( ('Yes' #gtkResponseYes) ('No' #gtkResponseNo))
+ ]
+
+ title: aTitle text: aDescription [
+ <category: 'initialization'>
+
+ hasPressedOk := false.
+ dialog := GTK.GtkDialog newWithButtons: aTitle parent: nil flags: 0
varargs: {nil}.
+ self buildCentralWidget: aDescription on: dialog.
+ "dialog showModalOnAnswer: [ :dlg :res |
+ res = GTK.Gtk gtkResponseYes ifTrue: [ hasPressedOk := true ].
+ dlg destroy ]"
+ ]
+
+ hasPressedOk: aBlock [
+ <category: 'testing'>
+
+ dialog showModalOnAnswer: [ :dlg :res |
+ res = defaultButton ifTrue: [ aBlock value ].
+ dlg destroy ]
+ ]
+
+ result [
+ <category: 'accessing'>
+
+ ^ entryWidget getText
+ ]
+
+ buildCentralWidget: aString on: aGtkDialog [
+ <category: 'user interface'>
+
+ | hbox |
+ buttons isNil ifTrue: [ self beOkCancel ].
+ buttons do: [ :each |
+ aGtkDialog addButton: each first responseId: (GTK.Gtk perform: each
second) ].
+
+ defaultButton := GTK.Gtk perform: buttons first second.
+ aGtkDialog setDefaultResponse: defaultButton.
+ hbox := GTK.GtkHBox new: true spacing: 0.
+ labelWidget := GTK.GtkLabel new: aString.
+ entryWidget := GTK.GtkEntry new.
+ entryWidget setActivatesDefault: true.
+ hbox
+ add: labelWidget;
+ add: entryWidget;
+ showAll.
+ aGtkDialog getVBox add: hbox
+ ]
+]
diff --git a/packages/gtktools/GtkMainWindow.st
b/packages/gtktools/GtkMainWindow.st
new file mode 100644
index 0000000..6e59e2a
--- /dev/null
+++ b/packages/gtktools/GtkMainWindow.st
@@ -0,0 +1,276 @@
+Object subclass: GtkMainWindow [
+ | window container menuBar toolBar centralWidget statusBar accelGroup |
+
+ GtkMainWindow class >> open [
+ <category: 'user interface'>
+
+ ^ (self new)
+ initialize;
+ showAll;
+ postInitialize;
+ yourself
+ ]
+
+ GtkMainWindow class >> openSized: aPoint [
+ <category: 'user interface'>
+
+ ^ (self new)
+ initialize;
+ resize: aPoint;
+ showAll;
+ postInitialize;
+ yourself
+ ]
+
+ centralWidget [
+ <category: 'accessing'>
+
+ ^ centralWidget
+ ]
+
+ centralWidget: aGtkWidget [
+ <category: 'accessing'>
+
+ centralWidget := aGtkWidget
+ ]
+
+ container [
+ <category: 'accessing'>
+
+ ^ container ifNil: [ container := GTK.GtkVBox new: false spacing: 0 ]
+ ]
+
+ accelGroup [
+ <category: 'accessing'>
+
+ ^ accelGroup ifNil: [ accelGroup := GTK.GtkAccelGroup new ]
+ ]
+
+ menuBar [
+ <category: 'accessing'>
+
+ ^ menuBar ifNil: [ menuBar := GTK.GtkMenuBar new ]
+ ]
+
+ menuBar: aGtkMenuBar [
+ <category: 'accessing'>
+
+ menuBar := aGtkMenuBar
+ ]
+
+ statusBar [
+ <category: 'accessing'>
+
+ ^ statusBar ifNil: [ statusBar := GTK.GtkStatusbar new ]
+ ]
+
+ statusBar: aGtkStatusBar [
+ <category: 'accessing'>
+
+ statusBar := aGtkStatusBar
+ ]
+
+ title [
+ <category: 'accessing'>
+
+ ^ window title
+ ]
+
+ title: aString [
+ <category: 'accessing'>
+
+ window setTitle: aString
+ ]
+
+ toolBar [
+ <category: 'accessing'>
+
+ ^ toolBar ifNil: [ toolBar := GTK.GtkToolbar new ]
+ ]
+
+ toolBar: aGtkToolBar [
+ <category: 'accessing'>
+
+ toolBar := aGtkToolBar
+ ]
+
+ aboutGst [
+ <category: 'events'>
+
+ (GTK.GtkAboutDialog new)
+ setProgramName: 'GNU Smalltalk';
+ setVersion: (Smalltalk version =~ 'version (.*)' at: 1);
+ setLicense: 'GNU Smalltalk is free software; you can redistribute
it and/or modify it
+under the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2, or (at your option) any later version.
+
+GNU Smalltalk is distributed in the hope that it will be useful, but WITHOUT
+ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
+details.
+
+You should have received a copy of the GNU General Public License along with
+GNU Smalltalk; see the file COPYING. If not, write to the Free Software
+Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
+
+Please consult the GNU Smalltalk source code for additional permissions
+that are specific to this version of GNU Smalltalk.';
+ setWebsite: 'http://smalltalk.gnu.org/';
+ showModalDestroy
+ ]
+
+ close [
+ <category: 'events'>
+
+ window hideAll
+ ]
+
+ initialize [
+ <category: 'intialization'>
+
+ window := GTK.GtkWindow new: GTK.Gtk gtkWindowToplevel.
+ window addAccelGroup: self accelGroup.
+ self
+ title: self windowTitle;
+ createMenus;
+ createToolbar;
+ createStatusBar;
+ centralWidget: self buildCentralWidget.
+ ]
+
+ buildCentralWidget [
+ <category: 'initialization'>
+ ^nil
+ ]
+
+ createStatusBar [
+ <category: 'user interface'>
+
+ self statusMessage: self windowTitle
+ ]
+
+ windowTitle [
+ <category: 'initialization'>
+ ^self class name
+ ]
+
+ createToolbar [
+ <category: 'initialization'>
+ ]
+
+ createMenus [
+ <category: 'initialization'>
+ ]
+
+ postInitialize [
+ <category: 'initialization'>
+
+ window
+ connectSignal: 'delete-event' to: self selector: #'onDelete:event:'
+ ]
+
+ onDelete: aGtkWidget event: aGdkEvent [
+ <category: 'events'>
+
+ window hideAll.
+ ^ true
+ ]
+
+ addMenuItem: aString [
+ <category: 'menubar'>
+
+ self menuBar append: (GTK.GtkMenuItem newWithLabel: aString)
+ ]
+
+ addMenuItem: aString withSubmenu: aGtkMenuItemArray [
+ <category: 'menubar'>
+
+ self menuBar append:
+ ((GTK.GtkMenuItem newWithLabel: aString)
+ setSubmenu: (self createNewMenuEntry: aGtkMenuItemArray))
+ ]
+
+ createMainMenu: anArray [
+ <category: 'menubar'>
+
+ anArray do: [ :each |
+ self addMenuItem: each first withSubmenu: (self perform: each
second) ]
+ ]
+
+ createNewMenuEntry: anArray [
+ <category: 'menubar'>
+
+ | menu |
+ menu := (GTK.GtkMenu new)
+ setAccelGroup: self accelGroup;
+ yourself.
+ anArray do: [ :each |
+ menu append: each ].
+ ^ menu
+ ]
+
+ statusMessage: aString [
+ <category: 'statusbar'>
+
+ self statusBar
+ push: 0 text: aString
+ ]
+
+ appendSeparator [
+ <category: 'toolbar'>
+
+ self appendToolItem: GTK.GtkSeparatorToolItem new
+ ]
+
+ appendToolItem: aGtkToolItem [
+ <category: 'toolbar'>
+
+ self toolBar insert: aGtkToolItem pos: -1
+ ]
+
+ appendWidget: aGtkWidget [
+ <category: 'toolbar'>
+
+ self appendToolItem: ((GTK.GtkToolItem new) add: aGtkWidget)
+ ]
+
+ resize: aPoint [
+ <category: 'user interface'>
+
+ window resize: aPoint x height: aPoint y
+ ]
+
+ showAll [
+ {menuBar->false. toolBar->false. centralWidget->true. statusBar->false}
do: [ :each |
+ each key ifNotNil: [ self container
+ packStart: each key expand: each value fill: true padding: 0 ]
].
+
+ window
+ add: self container;
+ showAll
+ ]
+
+ focusedWidget [
+ <category: 'focus'>
+
+ self subclassResponsibility
+ ]
+
+ onFocusPerform: aSymbol [
+ <category: 'widget'>
+
+ | widget |
+ widget := self focusedWidget.
+ widget isNil ifTrue: [ ^ self ].
+ ^ widget perform: aSymbol
+ ]
+
+ onFocusPerform: aSymbol with: anObject [
+ <category: 'widget'>
+
+ | widget |
+ widget := self focusedWidget.
+ widget isNil ifTrue: [ ^ self ].
+ ^ widget perform: aSymbol with: anObject
+ ]
+]
diff --git a/packages/gtktools/Makefile.frag b/packages/gtktools/Makefile.frag
new file mode 100644
index 0000000..e758dbc
--- /dev/null
+++ b/packages/gtktools/Makefile.frag
@@ -0,0 +1,5 @@
+GTKTools_FILES = \
+packages/gtktools/GtkMainWindow.st
packages/gtktools/GtkAbstractConcreteWidget.st
packages/gtktools/GtkConcreteWidget.st packages/gtktools/GtkEntryDialog.st
packages/gtktools/Tests/GtkConcreteWidgetTest.st
+$(GTKTools_FILES):
+$(srcdir)/packages/gtktools/stamp-classes: $(GTKTools_FILES)
+ touch $(srcdir)/packages/gtktools/stamp-classes
diff --git a/packages/gtktools/Tests/GtkConcreteWidgetTest.st
b/packages/gtktools/Tests/GtkConcreteWidgetTest.st
new file mode 100644
index 0000000..7fce2e4
--- /dev/null
+++ b/packages/gtktools/Tests/GtkConcreteWidgetTest.st
@@ -0,0 +1,42 @@
+TestCase subclass: GtkConcreteWidgetTest [
+
+ | show |
+
+ showAll [
+
+ show := true
+ ]
+
+ hideAll [
+
+ show := false
+ ]
+
+ getVisible [
+
+ ^ false
+ ]
+
+ testAbstractWidget [
+ <category: 'testing'>
+
+ self should: [ GtkAbstractConcreteWidget new hideAll. true ]
+ ]
+
+ testConcreteWidget [
+ <category: 'testing'>
+
+ | widget |
+ widget := GtkConcreteWidget parentWindow: #foo.
+ self assert: widget parentWindow = #foo.
+ widget mainWidget: self.
+ self assert: widget mainWidget = self.
+ widget showAll.
+ self assert: show.
+ widget hideAll.
+ self assert: show not.
+ self assert: widget isVisible not.
+ self should: [ widget grabFocus. true ].
+ self should: [ widget close. true].
+ ]
+]
diff --git a/packages/gtktools/package.xml b/packages/gtktools/package.xml
new file mode 100644
index 0000000..35c3414
--- /dev/null
+++ b/packages/gtktools/package.xml
@@ -0,0 +1,17 @@
+<package>
+ <name>GTKTools</name>
+ <namespace>GTKTools</namespace>
+ <prereq>GTK</prereq>
+
+ <filein>GtkMainWindow.st</filein>
+ <filein>GtkAbstractConcreteWidget.st</filein>
+ <filein>GtkConcreteWidget.st</filein>
+ <filein>GtkEntryDialog.st</filein>
+
+ <test>
+ <sunit>
+ GTKTools.GtkConcreteWidgetTest
+ </sunit>
+ <filein>Tests/GtkConcreteWidgetTest.st</filein>
+ </test>
+</package>
diff --git a/packages/visualgst/ChangeLog b/packages/visualgst/ChangeLog
index a12113b..a2d935f 100644
--- a/packages/visualgst/ChangeLog
+++ b/packages/visualgst/ChangeLog
@@ -1,3 +1,42 @@
+2013-03-30 Holger Hans Peter Freyther <address@hidden>
+
+ * Commands/CategoryMenus/AddCategoryCommand.st: Use GTKTools namespace.
+ * Commands/CategoryMenus/RenameCategoryCommand.st: Use GTKTools
namespace.
+ * Commands/ClassMenus/AddClassCommand.st: Use GTKTools namespace.
+ * Commands/ClassMenus/RenameClassCommand.st: Use GTKTools namespace.
+ * Commands/NamespaceMenus/AddNamespaceCommand.st: Use GTKTools
namespace.
+ * Commands/NamespaceMenus/RenameNamespaceCommand.st: Use GTKTools
namespace.
+ * Debugger/GtkContextWidget.st: Use GTKTools namespace.
+ * Debugger/GtkStackInspectorView.st: Use GTKTools namespace.
+ * GtkEntryWidget.st: Use GTKTools namespace.
+ * GtkHistoryWidget.st: Use GTKTools namespace.
+ * GtkNotebookWidget.st: Use GTKTools namespace.
+ * GtkPackageBuilderWidget.st: Use GTKTools namespace.
+ * GtkScrollTreeWidget.st: Use GTKTools namespace.
+ * GtkSidebarWidget.st: Use GTKTools namespace.
+ * GtkVariableTrackerWidget.st: Use GTKTools namespace.
+ * GtkVisualGSTTool.st: Use GTKTools namespace.
+ * Image/GtkImageWidget.st: Use GTKTools namespace.
+ * Implementors/GtkImageResultsWidget.st: Use GTKTools namespace.
+ * Inspector/GtkInspectorBrowserWidget.st: Use GTKTools namespace.
+ * Inspector/GtkInspectorWidget.st: Use GTKTools namespace.
+ * SUnit/GtkSUnitResultWidget.st: Use GTKTools namespace.
+ * StBrowser/GtkCategorizedClassWidget.st: Use GTKTools namespace.
+ * StBrowser/GtkCategorizedNamespaceWidget.st: Use GTKTools namespace.
+ * StBrowser/GtkCategoryWidget.st: Use GTKTools namespace.
+ * StBrowser/GtkClassBrowserWidget.st: Use GTKTools namespace.
+ * StBrowser/GtkClassHierarchyWidget.st: Use GTKTools namespace.
+ * StBrowser/GtkMethodWidget.st: Use GTKTools namespace.
+ * Tetris/Tetris.st: Use GTKTools namespace.
+ * Text/GtkTextPluginWidget.st: Use GTKTools namespace.
+ * Text/GtkTextWidget.st: Use GTKTools namespace.
+ * package.xml: Use GTKTools namespace.
+ * GtkAbstractConcreteWidget.st: Renamed to
packages/gtktools/GtkAbstractConcreteWidget.st.
+ * GtkConcreteWidget.st: Renamed to
packages/gtktools/GtkConcreteWidget.st.
+ * GtkEntryDialog.st: Renamed to packages/gtktools/GtkEntryDialog.st.
+ * GtkMainWindow.st: Renamed to packages/gtktools/GtkMainWindow.st.
+ * Tests/GtkConcreteWidgetTest.st: Renamed to
packages/gtktools/Tests/GtkConcreteWidgetTest.st.
+
2013-01-29 Holger Hans Peter Freyther <address@hidden>
* Notification/Kernel/Metaclass.st: Remove usages of #isUntrusted
diff --git a/packages/visualgst/Commands/CategoryMenus/AddCategoryCommand.st
b/packages/visualgst/Commands/CategoryMenus/AddCategoryCommand.st
index ef31ce2..8cbc060 100644
--- a/packages/visualgst/Commands/CategoryMenus/AddCategoryCommand.st
+++ b/packages/visualgst/Commands/CategoryMenus/AddCategoryCommand.st
@@ -9,7 +9,7 @@ ClassCommand subclass: AddCategoryCommand [
<category: 'command'>
| dlg |
- dlg := GtkEntryDialog title: 'Add a category' text: 'Name of the
category'.
+ dlg := GTKTools.GtkEntryDialog title: 'Add a category' text: 'Name of
the category'.
dlg hasPressedOk: [
self addCategory: dlg result onWidget: target viewedCategoryWidget
]
diff --git a/packages/visualgst/Commands/CategoryMenus/RenameCategoryCommand.st
b/packages/visualgst/Commands/CategoryMenus/RenameCategoryCommand.st
index fc27f7e..c577adf 100644
--- a/packages/visualgst/Commands/CategoryMenus/RenameCategoryCommand.st
+++ b/packages/visualgst/Commands/CategoryMenus/RenameCategoryCommand.st
@@ -9,7 +9,7 @@ CategoryCommand subclass: RenameCategoryCommand [
<category: 'command'>
| dlg |
- dlg := GtkEntryDialog title: 'Rename a category' text: 'Name of the
category'.
+ dlg := GTKTools.GtkEntryDialog title: 'Rename a category' text: 'Name
of the category'.
dlg hasPressedOk: [
(RenameCategoryUndoCommand rename: target state category in:
target state classOrMeta as: dlg result onModel: target viewedCategoryModel)
push ]
]
diff --git a/packages/visualgst/Commands/ClassMenus/AddClassCommand.st
b/packages/visualgst/Commands/ClassMenus/AddClassCommand.st
index 6d011a0..b000027 100644
--- a/packages/visualgst/Commands/ClassMenus/AddClassCommand.st
+++ b/packages/visualgst/Commands/ClassMenus/AddClassCommand.st
@@ -12,7 +12,7 @@ NamespaceCommand subclass: AddClassCommand [
superclass := target state hasSelectedClass
ifTrue: [ target state classOrMeta ]
ifFalse: [ Object ].
- dlg := GtkEntryDialog title: 'Add a class' text: 'Name of the new
class'.
+ dlg := GTKTools.GtkEntryDialog title: 'Add a class' text: 'Name of the
new class'.
dlg hasPressedOk: [
(AddClassUndoCommand
add: dlg result asSymbol
diff --git a/packages/visualgst/Commands/ClassMenus/RenameClassCommand.st
b/packages/visualgst/Commands/ClassMenus/RenameClassCommand.st
index b80aa86..9ee81c3 100644
--- a/packages/visualgst/Commands/ClassMenus/RenameClassCommand.st
+++ b/packages/visualgst/Commands/ClassMenus/RenameClassCommand.st
@@ -9,7 +9,7 @@ ClassCommand subclass: RenameClassCommand [
<category: 'command'>
| dlg |
- dlg := GtkEntryDialog title: 'Rename a class' text: 'Name of the
class'.
+ dlg := GTKTools.GtkEntryDialog title: 'Rename a class' text: 'Name of
the class'.
dlg hasPressedOk: [
(RenameClassUndoCommand rename: target state classOrMeta as: dlg
result asSymbol) push ]
]
diff --git a/packages/visualgst/Commands/NamespaceMenus/AddNamespaceCommand.st
b/packages/visualgst/Commands/NamespaceMenus/AddNamespaceCommand.st
index 8b87546..f899fb3 100644
--- a/packages/visualgst/Commands/NamespaceMenus/AddNamespaceCommand.st
+++ b/packages/visualgst/Commands/NamespaceMenus/AddNamespaceCommand.st
@@ -9,7 +9,7 @@ NamespaceCommand subclass: AddNamespaceCommand [
<category: 'command'>
| dlg |
- dlg := GtkEntryDialog title: 'Add a namespace' text: 'Name of the new
namespace'.
+ dlg := GTKTools.GtkEntryDialog title: 'Add a namespace' text: 'Name of
the new namespace'.
dlg hasPressedOk: [
(AddNamespaceUndoCommand add: dlg result asSymbol to: target state
namespace) push ]
]
diff --git
a/packages/visualgst/Commands/NamespaceMenus/RenameNamespaceCommand.st
b/packages/visualgst/Commands/NamespaceMenus/RenameNamespaceCommand.st
index b2b8e6c..d9daca4 100644
--- a/packages/visualgst/Commands/NamespaceMenus/RenameNamespaceCommand.st
+++ b/packages/visualgst/Commands/NamespaceMenus/RenameNamespaceCommand.st
@@ -9,7 +9,7 @@ NamespaceCommand subclass: RenameNamespaceCommand [
<category: 'command'>
| dlg |
- dlg := GtkEntryDialog title: 'Rename a namespace' text: 'Name of the
new namespace'.
+ dlg := GTKTools.GtkEntryDialog title: 'Rename a namespace' text: 'Name
of the new namespace'.
dlg hasPressedOk: [
(RenameNamespaceUndoCommand rename: target state namespace as: dlg
result asSymbol) push ]
]
diff --git a/packages/visualgst/Debugger/GtkContextWidget.st
b/packages/visualgst/Debugger/GtkContextWidget.st
index db47adb..86bd2d9 100644
--- a/packages/visualgst/Debugger/GtkContextWidget.st
+++ b/packages/visualgst/Debugger/GtkContextWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkContextWidget [
+GTKTools.GtkConcreteWidget subclass: GtkContextWidget [
| column contextTree model context contextList |
GtkContextWidget class >> on: aContext [
diff --git a/packages/visualgst/Debugger/GtkStackInspectorView.st
b/packages/visualgst/Debugger/GtkStackInspectorView.st
index dfb3436..45d2bdd 100644
--- a/packages/visualgst/Debugger/GtkStackInspectorView.st
+++ b/packages/visualgst/Debugger/GtkStackInspectorView.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkStackInspectorView [
+GTKTools.GtkConcreteWidget subclass: GtkStackInspectorView [
| object variables |
GtkStackInspectorView class >> openOn: aContext [
diff --git a/packages/visualgst/GtkAbstractConcreteWidget.st
b/packages/visualgst/GtkAbstractConcreteWidget.st
deleted file mode 100644
index 47f5c26..0000000
--- a/packages/visualgst/GtkAbstractConcreteWidget.st
+++ /dev/null
@@ -1,6 +0,0 @@
-Smalltalk.Object subclass: GtkAbstractConcreteWidget [
-
- hideAll [
- ]
-]
-
diff --git a/packages/visualgst/GtkConcreteWidget.st
b/packages/visualgst/GtkConcreteWidget.st
deleted file mode 100644
index 3c72f57..0000000
--- a/packages/visualgst/GtkConcreteWidget.st
+++ /dev/null
@@ -1,122 +0,0 @@
-GtkAbstractConcreteWidget subclass: GtkConcreteWidget [
- | child parentWindow popupMenu |
-
- GtkConcreteWidget class >> parentWindow: aGtkWindow [
- <category: 'instance creation'>
-
- ^ self new
- parentWindow: aGtkWindow;
- initialize;
- yourself
- ]
-
- GtkConcreteWidget class >> showAll [
- <category: 'instance creation'>
-
- ^ self new
- initialize;
- showAll;
- yourself
- ]
-
- initialize [
- <category: 'initialize'>
-
- ]
-
- parentWindow: aGtkWindow [
- <category: 'accessing'>
-
- parentWindow := aGtkWindow
- ]
-
- parentWindow [
- <category: 'accessing'>
-
- ^ parentWindow
- ]
-
- mainWidget [
- <category: 'accessing'>
-
- ^ child
- ]
-
- mainWidget: aGtkWidget [
- <category: 'accessing'>
-
- child ifNotNil: [ child hideAll ].
- child := aGtkWidget
- ]
-
- showAll [
- <category: 'user interface'>
-
- child showAll
- ]
-
- hideAll [
- <category: 'user interface'>
-
- child hideAll
- ]
-
- isVisible [
- <category: 'testing'>
-
- ^ child getVisible
- ]
-
- hasFocus [
- <category: 'testing'>
-
- | parent current |
- parent := child.
- [ (current := parent getFocusChild) notNil ] whileTrue: [
- parent := current ].
- ^ self parentWindow getFocus = parent
-
- ]
-
- focusedWidget [
- <category: 'focus'>
-
- self hasFocus ifTrue: [ ^ self ].
- ^ nil
- ]
-
- onFocusPerform: aSymbol [
- <category: 'widget'>
-
- ^ self focusedWidget perform: aSymbol
- ]
-
- onPress: aGtkWidget event: aGdkEvent [
- <category: 'button event'>
-
- | menu aGdkButtonEvent |
- aGdkButtonEvent := aGdkEvent castTo: GTK.GdkEventButton type.
- aGdkButtonEvent button value = 3 ifFalse: [ ^ false ].
- menu := popupMenu asPopupMenu.
- menu attachToWidget: self treeView detacher: nil.
- menu popup: nil parentMenuItem: nil func: nil data: nil button: 3
activateTime: aGdkButtonEvent time value.
- menu showAll.
- ^ true
- ]
-
- connectToWhenPopupMenu: aMenuBuilder [
- <category: 'user interface'>
-
- popupMenu := aMenuBuilder.
- ^ self treeView connectSignal: 'button-press-event' to: self selector:
#'onPress:event:'
- ]
-
- grabFocus [
- <category: 'user interface'>
-
- ]
-
- close [
- <category: 'user interface'>
- ]
-]
diff --git a/packages/visualgst/GtkEntryDialog.st
b/packages/visualgst/GtkEntryDialog.st
deleted file mode 100644
index 55827f5..0000000
--- a/packages/visualgst/GtkEntryDialog.st
+++ /dev/null
@@ -1,66 +0,0 @@
-Object subclass: GtkEntryDialog [
- | dialog labelWidget entryWidget hasPressedOk buttons defaultButton |
-
- GtkEntryDialog class >> title: aTitle text: aDescription [
- <category: 'instance creation'>
-
- ^ (self new)
- title: aTitle text: aDescription;
- yourself
- ]
-
- beOkCancel [
- buttons := #( ('Ok' #gtkResponseOk) ('Cancel' #gtkResponseCancel))
- ]
-
- beYesNo [
- buttons := #( ('Yes' #gtkResponseYes) ('No' #gtkResponseNo))
- ]
-
- title: aTitle text: aDescription [
- <category: 'initialization'>
-
- hasPressedOk := false.
- dialog := GTK.GtkDialog newWithButtons: aTitle parent: nil flags: 0
varargs: {nil}.
- self buildCentralWidget: aDescription on: dialog.
- "dialog showModalOnAnswer: [ :dlg :res |
- res = GTK.Gtk gtkResponseYes ifTrue: [ hasPressedOk := true ].
- dlg destroy ]"
- ]
-
- hasPressedOk: aBlock [
- <category: 'testing'>
-
- dialog showModalOnAnswer: [ :dlg :res |
- res = defaultButton ifTrue: [ aBlock value ].
- dlg destroy ]
- ]
-
- result [
- <category: 'accessing'>
-
- ^ entryWidget getText
- ]
-
- buildCentralWidget: aString on: aGtkDialog [
- <category: 'user interface'>
-
- | hbox |
- buttons isNil ifTrue: [ self beOkCancel ].
- buttons do: [ :each |
- aGtkDialog addButton: each first responseId: (GTK.Gtk perform: each
second) ].
-
- defaultButton := GTK.Gtk perform: buttons first second.
- aGtkDialog setDefaultResponse: defaultButton.
- hbox := GTK.GtkHBox new: true spacing: 0.
- labelWidget := GTK.GtkLabel new: aString.
- entryWidget := GTK.GtkEntry new.
- entryWidget setActivatesDefault: true.
- hbox
- add: labelWidget;
- add: entryWidget;
- showAll.
- aGtkDialog getVBox add: hbox
- ]
-]
-
diff --git a/packages/visualgst/GtkEntryWidget.st
b/packages/visualgst/GtkEntryWidget.st
index d637d74..5ce6f17 100644
--- a/packages/visualgst/GtkEntryWidget.st
+++ b/packages/visualgst/GtkEntryWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkEntryWidget [
+GTKTools.GtkConcreteWidget subclass: GtkEntryWidget [
GtkEntryWidget class >> labeled: aString [
<category: 'instance creation'>
diff --git a/packages/visualgst/GtkHistoryWidget.st
b/packages/visualgst/GtkHistoryWidget.st
index 3709bdb..571548b 100644
--- a/packages/visualgst/GtkHistoryWidget.st
+++ b/packages/visualgst/GtkHistoryWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkHistoryWidget [
+GTKTools.GtkConcreteWidget subclass: GtkHistoryWidget [
| browser model widget |
GtkHistoryWidget class >> new [
diff --git a/packages/visualgst/GtkMainWindow.st
b/packages/visualgst/GtkMainWindow.st
deleted file mode 100644
index 4f15871..0000000
--- a/packages/visualgst/GtkMainWindow.st
+++ /dev/null
@@ -1,276 +0,0 @@
-Smalltalk.Object subclass: GtkMainWindow [
- | window container menuBar toolBar centralWidget statusBar accelGroup |
-
- GtkMainWindow class >> open [
- <category: 'user interface'>
-
- ^ (self new)
- initialize;
- showAll;
- postInitialize;
- yourself
- ]
-
- GtkMainWindow class >> openSized: aPoint [
- <category: 'user interface'>
-
- ^ (self new)
- initialize;
- resize: aPoint;
- showAll;
- postInitialize;
- yourself
- ]
-
- centralWidget [
- <category: 'accessing'>
-
- ^ centralWidget
- ]
-
- centralWidget: aGtkWidget [
- <category: 'accessing'>
-
- centralWidget := aGtkWidget
- ]
-
- container [
- <category: 'accessing'>
-
- ^ container ifNil: [ container := GTK.GtkVBox new: false spacing: 0 ]
- ]
-
- accelGroup [
- <category: 'accessing'>
-
- ^ accelGroup ifNil: [ accelGroup := GTK.GtkAccelGroup new ]
- ]
-
- menuBar [
- <category: 'accessing'>
-
- ^ menuBar ifNil: [ menuBar := GTK.GtkMenuBar new ]
- ]
-
- menuBar: aGtkMenuBar [
- <category: 'accessing'>
-
- menuBar := aGtkMenuBar
- ]
-
- statusBar [
- <category: 'accessing'>
-
- ^ statusBar ifNil: [ statusBar := GTK.GtkStatusbar new ]
- ]
-
- statusBar: aGtkStatusBar [
- <category: 'accessing'>
-
- statusBar := aGtkStatusBar
- ]
-
- title [
- <category: 'accessing'>
-
- ^ window title
- ]
-
- title: aString [
- <category: 'accessing'>
-
- window setTitle: aString
- ]
-
- toolBar [
- <category: 'accessing'>
-
- ^ toolBar ifNil: [ toolBar := GTK.GtkToolbar new ]
- ]
-
- toolBar: aGtkToolBar [
- <category: 'accessing'>
-
- toolBar := aGtkToolBar
- ]
-
- aboutGst [
- <category: 'events'>
-
- (GTK.GtkAboutDialog new)
- setProgramName: 'GNU Smalltalk';
- setVersion: (Smalltalk version =~ 'version (.*)' at: 1);
- setLicense: 'GNU Smalltalk is free software; you can redistribute
it and/or modify it
-under the terms of the GNU General Public License as published by the Free
-Software Foundation; either version 2, or (at your option) any later version.
-
-GNU Smalltalk is distributed in the hope that it will be useful, but WITHOUT
-ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
-FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
-details.
-
-You should have received a copy of the GNU General Public License along with
-GNU Smalltalk; see the file COPYING. If not, write to the Free Software
-Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
-
-Please consult the GNU Smalltalk source code for additional permissions
-that are specific to this version of GNU Smalltalk.';
- setWebsite: 'http://smalltalk.gnu.org/';
- showModalDestroy
- ]
-
- close [
- <category: 'events'>
-
- window hideAll
- ]
-
- initialize [
- <category: 'intialization'>
-
- window := GTK.GtkWindow new: GTK.Gtk gtkWindowToplevel.
- window addAccelGroup: self accelGroup.
- self
- title: self windowTitle;
- createMenus;
- createToolbar;
- createStatusBar;
- centralWidget: self buildCentralWidget.
- ]
-
- buildCentralWidget [
- <category: 'initialization'>
- ^nil
- ]
-
- createStatusBar [
- <category: 'user interface'>
-
- self statusMessage: self windowTitle
- ]
-
- windowTitle [
- <category: 'initialization'>
- ^self class name
- ]
-
- createToolbar [
- <category: 'initialization'>
- ]
-
- createMenus [
- <category: 'initialization'>
- ]
-
- postInitialize [
- <category: 'initialization'>
-
- window
- connectSignal: 'delete-event' to: self selector: #'onDelete:event:'
- ]
-
- onDelete: aGtkWidget event: aGdkEvent [
- <category: 'events'>
-
- window hideAll.
- ^ true
- ]
-
- addMenuItem: aString [
- <category: 'menubar'>
-
- self menuBar append: (GTK.GtkMenuItem newWithLabel: aString)
- ]
-
- addMenuItem: aString withSubmenu: aGtkMenuItemArray [
- <category: 'menubar'>
-
- self menuBar append:
- ((GTK.GtkMenuItem newWithLabel: aString)
- setSubmenu: (self createNewMenuEntry: aGtkMenuItemArray))
- ]
-
- createMainMenu: anArray [
- <category: 'menubar'>
-
- anArray do: [ :each |
- self addMenuItem: each first withSubmenu: (self perform: each
second) ]
- ]
-
- createNewMenuEntry: anArray [
- <category: 'menubar'>
-
- | menu |
- menu := (GTK.GtkMenu new)
- setAccelGroup: self accelGroup;
- yourself.
- anArray do: [ :each |
- menu append: each ].
- ^ menu
- ]
-
- statusMessage: aString [
- <category: 'statusbar'>
-
- self statusBar
- push: 0 text: aString
- ]
-
- appendSeparator [
- <category: 'toolbar'>
-
- self appendToolItem: GTK.GtkSeparatorToolItem new
- ]
-
- appendToolItem: aGtkToolItem [
- <category: 'toolbar'>
-
- self toolBar insert: aGtkToolItem pos: -1
- ]
-
- appendWidget: aGtkWidget [
- <category: 'toolbar'>
-
- self appendToolItem: ((GTK.GtkToolItem new) add: aGtkWidget)
- ]
-
- resize: aPoint [
- <category: 'user interface'>
-
- window resize: aPoint x height: aPoint y
- ]
-
- showAll [
- {menuBar->false. toolBar->false. centralWidget->true. statusBar->false}
do: [ :each |
- each key ifNotNil: [ self container
- packStart: each key expand: each value fill: true padding: 0 ]
].
-
- window
- add: self container;
- showAll
- ]
-
- focusedWidget [
- <category: 'focus'>
-
- self subclassResponsibility
- ]
-
- onFocusPerform: aSymbol [
- <category: 'widget'>
-
- | widget |
- widget := self focusedWidget.
- widget isNil ifTrue: [ ^ self ].
- ^ widget perform: aSymbol
- ]
-
- onFocusPerform: aSymbol with: anObject [
- <category: 'widget'>
-
- | widget |
- widget := self focusedWidget.
- widget isNil ifTrue: [ ^ self ].
- ^ widget perform: aSymbol with: anObject
- ]
-]
diff --git a/packages/visualgst/GtkNotebookWidget.st
b/packages/visualgst/GtkNotebookWidget.st
index d1a42bb..4916c65 100644
--- a/packages/visualgst/GtkNotebookWidget.st
+++ b/packages/visualgst/GtkNotebookWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkNotebookWidget [
+GTKTools.GtkConcreteWidget subclass: GtkNotebookWidget [
| currentWidget selectMessage notebook pages labels |
initialize [
diff --git a/packages/visualgst/GtkPackageBuilderWidget.st
b/packages/visualgst/GtkPackageBuilderWidget.st
index 143c1f8..c06a308 100644
--- a/packages/visualgst/GtkPackageBuilderWidget.st
+++ b/packages/visualgst/GtkPackageBuilderWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkPackageBuilderWidget [
+GTKTools.GtkConcreteWidget subclass: GtkPackageBuilderWidget [
| classList ressourceList packName namespace provide provideList test
classCategory prereq prereqList entries |
diff --git a/packages/visualgst/GtkScrollTreeWidget.st
b/packages/visualgst/GtkScrollTreeWidget.st
index 6099a9c..5adb618 100644
--- a/packages/visualgst/GtkScrollTreeWidget.st
+++ b/packages/visualgst/GtkScrollTreeWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkScrollTreeWidget [
+GTKTools.GtkConcreteWidget subclass: GtkScrollTreeWidget [
GtkScrollTreeWidget class >> createListWithModel: anObject [
<category: 'instance creation'>
diff --git a/packages/visualgst/GtkSidebarWidget.st
b/packages/visualgst/GtkSidebarWidget.st
index c5f1eb7..3667e86 100644
--- a/packages/visualgst/GtkSidebarWidget.st
+++ b/packages/visualgst/GtkSidebarWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkSidebarWidget [
+GTKTools.GtkConcreteWidget subclass: GtkSidebarWidget [
| activeWidget widgets widgetEvents paned |
initialize [
@@ -10,7 +10,7 @@ GtkConcreteWidget subclass: GtkSidebarWidget [
yourself.
self mainWidget: paned.
widgetEvents := Dictionary new.
- activeWidget := GtkAbstractConcreteWidget new.
+ activeWidget := GTKTools.GtkAbstractConcreteWidget new.
widgets := OrderedCollection new
]
diff --git a/packages/visualgst/GtkVariableTrackerWidget.st
b/packages/visualgst/GtkVariableTrackerWidget.st
index ff5b6b2..041162a 100644
--- a/packages/visualgst/GtkVariableTrackerWidget.st
+++ b/packages/visualgst/GtkVariableTrackerWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkVariableTrackerWidget [
+GTKTools.GtkConcreteWidget subclass: GtkVariableTrackerWidget [
| model object widget |
GtkVariableTrackerWidget class >> on: anObject [
diff --git a/packages/visualgst/GtkVisualGSTTool.st
b/packages/visualgst/GtkVisualGSTTool.st
index 3859b39..a08f9a5 100644
--- a/packages/visualgst/GtkVisualGSTTool.st
+++ b/packages/visualgst/GtkVisualGSTTool.st
@@ -1,4 +1,4 @@
-GtkMainWindow subclass: GtkVisualGSTTool [
+GTKTools.GtkMainWindow subclass: GtkVisualGSTTool [
<comment: 'I am the base for various tools of VisualGST.'>
GtkVisualGSTTool class >> version [
diff --git a/packages/visualgst/Image/GtkImageWidget.st
b/packages/visualgst/Image/GtkImageWidget.st
index e1e7865..6b5dc78 100644
--- a/packages/visualgst/Image/GtkImageWidget.st
+++ b/packages/visualgst/Image/GtkImageWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkImageWidget [
+GTKTools.GtkConcreteWidget subclass: GtkImageWidget [
| imageTree image model searchEntry |
diff --git a/packages/visualgst/Implementors/GtkImageResultsWidget.st
b/packages/visualgst/Implementors/GtkImageResultsWidget.st
index 9a7efbb..0901c53 100644
--- a/packages/visualgst/Implementors/GtkImageResultsWidget.st
+++ b/packages/visualgst/Implementors/GtkImageResultsWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkImageResultsWidget [
+GTKTools.GtkConcreteWidget subclass: GtkImageResultsWidget [
| result resultTree model |
initialize [
diff --git a/packages/visualgst/Inspector/GtkInspectorBrowserWidget.st
b/packages/visualgst/Inspector/GtkInspectorBrowserWidget.st
index e4e3f3e..04a72ab 100644
--- a/packages/visualgst/Inspector/GtkInspectorBrowserWidget.st
+++ b/packages/visualgst/Inspector/GtkInspectorBrowserWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkInspectorBrowserWidget [
+GTKTools.GtkConcreteWidget subclass: GtkInspectorBrowserWidget [
| checkCode namespaceWidget classHierarchyWidget classHierarchyUpdate
iCategoryWidget iMethodWidget cCategoryWidget cMethodWidget codeWidget state |
GtkInspectorBrowserWidget class >> title [
diff --git a/packages/visualgst/Inspector/GtkInspectorWidget.st
b/packages/visualgst/Inspector/GtkInspectorWidget.st
index 99b6412..83a2364 100644
--- a/packages/visualgst/Inspector/GtkInspectorWidget.st
+++ b/packages/visualgst/Inspector/GtkInspectorWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkInspectorWidget [
+GTKTools.GtkConcreteWidget subclass: GtkInspectorWidget [
| inspector model object inspectorTree workspaceWidget objectView stack |
GtkInspectorWidget >> openOn: anObject [
diff --git a/packages/visualgst/Makefile.frag b/packages/visualgst/Makefile.frag
index a6686a4..a6487e6 100644
--- a/packages/visualgst/Makefile.frag
+++ b/packages/visualgst/Makefile.frag
@@ -1,5 +1,5 @@
VisualGST_FILES = \
-packages/visualgst/Notification/AbstractEvent.st
packages/visualgst/Notification/AddedEvent.st
packages/visualgst/Notification/CommentedEvent.st
packages/visualgst/Notification/DoItEvent.st
packages/visualgst/Notification/SystemEventManager.st
packages/visualgst/Notification/EventMultiplexer.st
packages/visualgst/Notification/EventDispatcher.st
packages/visualgst/Notification/ModifiedEvent.st
packages/visualgst/Notification/ModifiedClassDefinitionEvent.st
packages/visualgst/Notification/RecategorizedEvent.st
packages/visualgst/Notification/RemovedEvent.st
packages/visualgst/Notification/RenamedEvent.st
packages/visualgst/Notification/ReorganizedEvent.st
packages/visualgst/Notification/SystemChangeNotifier.st
packages/visualgst/GtkAnnouncer.st
packages/visualgst/GtkNamespaceSelectionChanged.st
packages/visualgst/GtkClassSelectionChanged.st
packages/visualgst/Commands/Command.st
packages/visualgst/Commands/SmalltalkMenus/DoItCommand.st
packages/visualgst/Commands/SmalltalkMenus/DebugI
tCommand.st packages/visualgst/Commands/SmalltalkMenus/PrintItCommand.st
packages/visualgst/Commands/SmalltalkMenus/InspectItCommand.st
packages/visualgst/Commands/SmalltalkMenus/AcceptItCommand.st
packages/visualgst/Commands/SmalltalkMenus/CancelCommand.st
packages/visualgst/Commands/HistoryCommands/HistoryBackCommand.st
packages/visualgst/Commands/HistoryCommands/HistoryDisplayCommand.st
packages/visualgst/Commands/HistoryCommands/HistoryForwardCommand.st
packages/visualgst/Commands/TabsMenus/CloseTabCommand.st
packages/visualgst/Commands/TabsMenus/NextTabCommand.st
packages/visualgst/Commands/TabsMenus/PreviousTabCommand.st
packages/visualgst/Commands/NamespaceMenus/NamespaceCommand.st
packages/visualgst/Commands/NamespaceMenus/InspectNamespaceCommand.st
packages/visualgst/Commands/NamespaceMenus/FileoutNamespaceCommand.st
packages/visualgst/Commands/NamespaceMenus/AddNamespaceCommand.st
packages/visualgst/Commands/NamespaceMenus/DeleteNamespaceCommand.st
packages/visualgst/Comma
nds/NamespaceMenus/RenameNamespaceCommand.st
packages/visualgst/Commands/ClassMenus/ClassCommand.st
packages/visualgst/Commands/ClassMenus/InspectClassCommand.st
packages/visualgst/Commands/ClassMenus/FileoutClassCommand.st
packages/visualgst/Commands/ClassMenus/AddClassCommand.st
packages/visualgst/Commands/ClassMenus/DeleteClassCommand.st
packages/visualgst/Commands/ClassMenus/RenameClassCommand.st
packages/visualgst/Commands/CategoryMenus/CategoryCommand.st
packages/visualgst/Commands/CategoryMenus/FileoutCategoryCommand.st
packages/visualgst/Commands/CategoryMenus/AddCategoryCommand.st
packages/visualgst/Commands/CategoryMenus/RenameCategoryCommand.st
packages/visualgst/Commands/MethodMenus/MethodCommand.st
packages/visualgst/Commands/MethodMenus/FileoutMethodCommand.st
packages/visualgst/Commands/MethodMenus/InspectMethodCommand.st
packages/visualgst/Commands/MethodMenus/DeleteMethodCommand.st
packages/visualgst/Commands/MethodMenus/DebugTestCommand.st
packages/visualgst/Comman
ds/ToolsMenus/OpenAssistantCommand.st
packages/visualgst/Commands/ToolsMenus/OpenWebBrowserCommand.st
packages/visualgst/Commands/EditMenus/CancelEditCommand.st
packages/visualgst/Commands/EditMenus/UndoEditCommand.st
packages/visualgst/Commands/EditMenus/RedoEditCommand.st
packages/visualgst/Commands/EditMenus/CutEditCommand.st
packages/visualgst/Commands/EditMenus/CopyEditCommand.st
packages/visualgst/Commands/EditMenus/PasteEditCommand.st
packages/visualgst/Commands/EditMenus/SelectAllEditCommand.st
packages/visualgst/Commands/EditMenus/FindEditCommand.st
packages/visualgst/Commands/EditMenus/ReplaceEditCommand.st
packages/visualgst/Commands/DebugMenus/DebugCommand.st
packages/visualgst/Commands/DebugMenus/ContinueDebugCommand.st
packages/visualgst/Commands/DebugMenus/StepIntoDebugCommand.st
packages/visualgst/Commands/DebugMenus/StepToDebugCommand.st
packages/visualgst/Menus/MenuBuilder.st
packages/visualgst/Menus/MenuSeparator.st
packages/visualgst/Menus/ToolbarSeparator.st pac
kages/visualgst/Menus/LauncherToolbar.st
packages/visualgst/Menus/DebuggerToolbar.st
packages/visualgst/Menus/NamespaceMenus.st
packages/visualgst/Menus/ClassMenus.st
packages/visualgst/Menus/CategoryMenus.st
packages/visualgst/Menus/ContextMenus.st
packages/visualgst/Menus/MethodMenus.st packages/visualgst/Menus/EditMenus.st
packages/visualgst/Menus/SmalltalkMenus.st
packages/visualgst/Menus/ToolsMenus.st packages/visualgst/Menus/HistoryMenus.st
packages/visualgst/Menus/TabsMenus.st
packages/visualgst/Menus/InspectorMenus.st
packages/visualgst/Menus/TextMenus.st
packages/visualgst/Menus/WorkspaceVariableMenus.st
packages/visualgst/Menus/SimpleWorkspaceMenus.st
packages/visualgst/Menus/WorkspaceMenus.st packages/visualgst/FakeNamespace.st
packages/visualgst/Category/ClassCategory.st
packages/visualgst/Category/AbstractNamespace.st
packages/visualgst/Category/Class.st
packages/visualgst/GtkAbstractConcreteWidget.st
packages/visualgst/GtkConcreteWidget.st packages/visualgst/GtkScrollT
reeWidget.st packages/visualgst/GtkSimpleListWidget.st
packages/visualgst/GtkEntryWidget.st packages/visualgst/GtkSidebarWidget.st
packages/visualgst/GtkHSidebarWidget.st packages/visualgst/GtkVSidebarWidget.st
packages/visualgst/Model/GtkColumnType.st
packages/visualgst/Model/GtkColumnTextType.st
packages/visualgst/Model/GtkColumnPixbufType.st
packages/visualgst/Model/GtkColumnOOPType.st packages/visualgst/GtkListModel.st
packages/visualgst/GtkTreeModel.st packages/visualgst/Text/GtkTextWidget.st
packages/visualgst/GtkPackageBuilderWidget.st
packages/visualgst/GtkMainWindow.st packages/visualgst/GtkVisualGSTTool.st
packages/visualgst/GtkBrowsingTool.st packages/visualgst/GtkLauncher.st
packages/visualgst/Text/GtkTextPluginWidget.st
packages/visualgst/Text/GtkFindWidget.st
packages/visualgst/Text/GtkReplaceWidget.st
packages/visualgst/Text/GtkSaveTextWidget.st
packages/visualgst/GtkNotebookWidget.st
packages/visualgst/Image/GtkImageModel.st
packages/visualgst/Image/GtkImageWidget.st
packages/visualgst/Debugger/GtkContextWidget.st
packages/visualgst/Debugger/GtkDebugger.st
packages/visualgst/State/BrowserState.st
packages/visualgst/State/NamespaceState.st
packages/visualgst/State/ClassState.st
packages/visualgst/State/CategoryState.st
packages/visualgst/State/MethodState.st
packages/visualgst/GtkWorkspaceWidget.st
packages/visualgst/GtkTranscriptWidget.st
packages/visualgst/StBrowser/GtkCategorizedNamespaceWidget.st
packages/visualgst/StBrowser/GtkCategorizedClassWidget.st
packages/visualgst/StBrowser/GtkCategoryWidget.st
packages/visualgst/StBrowser/GtkMethodWidget.st
packages/visualgst/Text/GtkSourceCodeWidget.st
packages/visualgst/StBrowser/GtkClassHierarchyWidget.st
packages/visualgst/GtkHistoryWidget.st
packages/visualgst/Inspector/GtkInspector.st
packages/visualgst/StBrowser/GtkClassBrowserWidget.st
packages/visualgst/GtkEntryDialog.st packages/visualgst/HistoryStack.st
packages/visualgst/Undo/UndoStack.st packages/visualgst/Undo/UndoCommand.st
packages/v
isualgst/Undo/AddNamespaceUndoCommand.st
packages/visualgst/Undo/RenameNamespaceUndoCommand.st
packages/visualgst/Undo/DeleteNamespaceUndoCommand.st
packages/visualgst/Source/SourceFormatter.st
packages/visualgst/Source/NamespaceHeaderSource.st
packages/visualgst/Source/NamespaceSource.st
packages/visualgst/Source/ClassHeaderSource.st
packages/visualgst/Source/ClassSource.st
packages/visualgst/Source/CategorySource.st
packages/visualgst/Source/MethodSource.st
packages/visualgst/Source/PackageSource.st
packages/visualgst/Source/BrowserMethodSource.st
packages/visualgst/Undo/AddClassUndoCommand.st
packages/visualgst/Undo/RenameClassUndoCommand.st
packages/visualgst/Undo/DeleteClassUndoCommand.st
packages/visualgst/AbstractFinder.st packages/visualgst/NamespaceFinder.st
packages/visualgst/ClassFinder.st packages/visualgst/MethodFinder.st
packages/visualgst/GtkWebBrowser.st packages/visualgst/GtkWebView.st
packages/visualgst/Extensions.st packages/visualgst/GtkAssistant.st
packages/visu
algst/Undo/RenameCategoryUndoCommand.st
packages/visualgst/Undo/AddMethodUndoCommand.st
packages/visualgst/Undo/DeleteMethodUndoCommand.st
packages/visualgst/WorkspaceVariableTracker.st
packages/visualgst/GtkVariableTrackerWidget.st
packages/visualgst/SyntaxHighlighter.st
packages/visualgst/Undo/Text/InsertTextCommand.st
packages/visualgst/Undo/Text/DeleteTextCommand.st
packages/visualgst/Undo/Text/ReplaceTextCommand.st
packages/visualgst/Clock/GtkClock.st
packages/visualgst/Inspector/GtkInspectorSourceWidget.st
packages/visualgst/Inspector/GtkInspectorBrowserWidget.st
packages/visualgst/Inspector/GtkInspectorWidget.st
packages/visualgst/Inspector/GtkObjectInspectorView.st
packages/visualgst/Inspector/GtkCompiledMethodInspectorView.st
packages/visualgst/Inspector/GtkCompiledBlockInspectorView.st
packages/visualgst/Inspector/GtkSequenceableCollectionInspectorView.st
packages/visualgst/Inspector/GtkSetInspectorView.st
packages/visualgst/Inspector/GtkDictionaryInspectorView.st packages
/visualgst/Inspector/GtkCharacterInspectorView.st
packages/visualgst/Inspector/GtkIntegerInspectorView.st
packages/visualgst/Inspector/GtkFloatInspectorView.st
packages/visualgst/Implementors/GtkImageResultsWidget.st
packages/visualgst/Implementors/GtkImplementorResultsWidget.st
packages/visualgst/Implementors/GtkSenderResultsWidget.st
packages/visualgst/Notification/Kernel/AbstractNamespace.st
packages/visualgst/Notification/Kernel/Metaclass.st
packages/visualgst/Notification/Kernel/Class.st
packages/visualgst/Notification/Kernel/MethodDictionary.st
packages/visualgst/Debugger/GtkStackInspectorView.st
packages/visualgst/Debugger/GtkStackInspector.st
packages/visualgst/Tetris/HighScores.st packages/visualgst/Tetris/Score.st
packages/visualgst/Tetris/TetrisPieceWidget.st
packages/visualgst/Tetris/BlockWidget.st
packages/visualgst/Tetris/TetrisField.st
packages/visualgst/Tetris/TetrisPiece.st
packages/visualgst/Tetris/TetrisPieceI.st
packages/visualgst/Tetris/TetrisPieceJ.st packages/
visualgst/Tetris/TetrisPieceL.st packages/visualgst/Tetris/TetrisPieceO.st
packages/visualgst/Tetris/TetrisPieceS.st
packages/visualgst/Tetris/TetrisPieceT.st
packages/visualgst/Tetris/TetrisPieceZ.st packages/visualgst/Tetris/Tetris.st
packages/visualgst/SUnit/TestBacktraceLog.st
packages/visualgst/SUnit/GtkSUnitResultWidget.st
packages/visualgst/GtkClassSUnitWidget.st
packages/visualgst/GtkMethodSUnitWidget.st packages/visualgst/SUnit/GtkSUnit.st
packages/visualgst/Commands/OpenBrowserCommand.st
packages/visualgst/Commands/OpenTabbedBrowserCommand.st
packages/visualgst/Commands/ToolsMenus/OpenSUnitCommand.st
packages/visualgst/Commands/ToolsMenus/OpenBottomPaneCommand.st
packages/visualgst/Commands/OpenWorkspaceCommand.st
packages/visualgst/Commands/ToolsMenus/OpenImplementorCommand.st
packages/visualgst/Commands/ToolsMenus/OpenSenderCommand.st
packages/visualgst/Commands/ToolsMenus/OpenPackageBuilderCommand.st
packages/visualgst/Commands/SaveImageCommand.st packages/visualgst/Com
mands/SaveImageAsCommand.st
packages/visualgst/Commands/InspectorMenus/InspectorBackCommand.st
packages/visualgst/Commands/InspectorMenus/InspectorDiveCommand.st
packages/visualgst/Commands/WorkspaceMenus/DeleteItemCommand.st
packages/visualgst/Commands/WorkspaceMenus/InspectItemCommand.st
packages/visualgst/Commands/WorkspaceMenus/WorkspaceVariableCommand.st
packages/visualgst/Icons/category.gif packages/visualgst/Icons/namespace.gif
packages/visualgst/Icons/go-bottom.png packages/visualgst/Icons/go-down.png
packages/visualgst/Icons/go-first.png packages/visualgst/Icons/go-home.png
packages/visualgst/Icons/go-jump.png packages/visualgst/Icons/go-last.png
packages/visualgst/Icons/go-next.png packages/visualgst/Icons/go-previous.png
packages/visualgst/Icons/go-run.png packages/visualgst/Icons/go-top.png
packages/visualgst/Icons/go-up.png packages/visualgst/Icons/NUnit.Failed.png
packages/visualgst/Icons/NUnit.Loading.png
packages/visualgst/Icons/NUnit.None.png packages/visualgst/Icon
s/NUnit.NotRun.png packages/visualgst/Icons/NUnit.Running.png
packages/visualgst/Icons/NUnit.SuccessAndFailed.png
packages/visualgst/Icons/NUnit.Success.png
packages/visualgst/Icons/extension.png packages/visualgst/Icons/overridden.png
packages/visualgst/Icons/override.png packages/visualgst/Icons/visualgst.png
packages/visualgst/Tests/AddNamespaceUndoCommandTest.st
packages/visualgst/Tests/GtkMethodWidgetTest.st
packages/visualgst/Tests/CompiledMethodTest.st
packages/visualgst/Tests/ExtractLiteralsTest.st
packages/visualgst/Tests/CategoryTest.st
packages/visualgst/Tests/GtkScrollTreeWidgetTest.st
packages/visualgst/Tests/MenuBuilderTest.st
packages/visualgst/Tests/GtkAssistantTest.st
packages/visualgst/Tests/GtkSimpleListWidgetTest.st
packages/visualgst/Tests/EmptyTest.st
packages/visualgst/Tests/AddClassUndoCommandTest.st
packages/visualgst/Tests/GtkCategoryWidgetTest.st
packages/visualgst/Tests/StateTest.st packages/visualgst/Tests/FinderTest.st
packages/visualgst/Tests/PragmaTes
t.st packages/visualgst/Tests/GtkCategorizedNamespaceWidgetTest.st
packages/visualgst/Tests/GtkCategorizedClassWidgetTest.st
packages/visualgst/Tests/GtkConcreteWidgetTest.st
+packages/visualgst/Notification/AbstractEvent.st
packages/visualgst/Notification/AddedEvent.st
packages/visualgst/Notification/CommentedEvent.st
packages/visualgst/Notification/DoItEvent.st
packages/visualgst/Notification/SystemEventManager.st
packages/visualgst/Notification/EventMultiplexer.st
packages/visualgst/Notification/EventDispatcher.st
packages/visualgst/Notification/ModifiedEvent.st
packages/visualgst/Notification/ModifiedClassDefinitionEvent.st
packages/visualgst/Notification/RecategorizedEvent.st
packages/visualgst/Notification/RemovedEvent.st
packages/visualgst/Notification/RenamedEvent.st
packages/visualgst/Notification/ReorganizedEvent.st
packages/visualgst/Notification/SystemChangeNotifier.st
packages/visualgst/GtkAnnouncer.st
packages/visualgst/GtkNamespaceSelectionChanged.st
packages/visualgst/GtkClassSelectionChanged.st
packages/visualgst/Commands/Command.st
packages/visualgst/Commands/SmalltalkMenus/DoItCommand.st
packages/visualgst/Commands/SmalltalkMenus/DebugI
tCommand.st packages/visualgst/Commands/SmalltalkMenus/PrintItCommand.st
packages/visualgst/Commands/SmalltalkMenus/InspectItCommand.st
packages/visualgst/Commands/SmalltalkMenus/AcceptItCommand.st
packages/visualgst/Commands/SmalltalkMenus/CancelCommand.st
packages/visualgst/Commands/HistoryCommands/HistoryBackCommand.st
packages/visualgst/Commands/HistoryCommands/HistoryDisplayCommand.st
packages/visualgst/Commands/HistoryCommands/HistoryForwardCommand.st
packages/visualgst/Commands/TabsMenus/CloseTabCommand.st
packages/visualgst/Commands/TabsMenus/NextTabCommand.st
packages/visualgst/Commands/TabsMenus/PreviousTabCommand.st
packages/visualgst/Commands/NamespaceMenus/NamespaceCommand.st
packages/visualgst/Commands/NamespaceMenus/InspectNamespaceCommand.st
packages/visualgst/Commands/NamespaceMenus/FileoutNamespaceCommand.st
packages/visualgst/Commands/NamespaceMenus/AddNamespaceCommand.st
packages/visualgst/Commands/NamespaceMenus/DeleteNamespaceCommand.st
packages/visualgst/Comma
nds/NamespaceMenus/RenameNamespaceCommand.st
packages/visualgst/Commands/ClassMenus/ClassCommand.st
packages/visualgst/Commands/ClassMenus/InspectClassCommand.st
packages/visualgst/Commands/ClassMenus/FileoutClassCommand.st
packages/visualgst/Commands/ClassMenus/AddClassCommand.st
packages/visualgst/Commands/ClassMenus/DeleteClassCommand.st
packages/visualgst/Commands/ClassMenus/RenameClassCommand.st
packages/visualgst/Commands/CategoryMenus/CategoryCommand.st
packages/visualgst/Commands/CategoryMenus/FileoutCategoryCommand.st
packages/visualgst/Commands/CategoryMenus/AddCategoryCommand.st
packages/visualgst/Commands/CategoryMenus/RenameCategoryCommand.st
packages/visualgst/Commands/MethodMenus/MethodCommand.st
packages/visualgst/Commands/MethodMenus/FileoutMethodCommand.st
packages/visualgst/Commands/MethodMenus/InspectMethodCommand.st
packages/visualgst/Commands/MethodMenus/DeleteMethodCommand.st
packages/visualgst/Commands/MethodMenus/DebugTestCommand.st
packages/visualgst/Comman
ds/ToolsMenus/OpenAssistantCommand.st
packages/visualgst/Commands/ToolsMenus/OpenWebBrowserCommand.st
packages/visualgst/Commands/EditMenus/CancelEditCommand.st
packages/visualgst/Commands/EditMenus/UndoEditCommand.st
packages/visualgst/Commands/EditMenus/RedoEditCommand.st
packages/visualgst/Commands/EditMenus/CutEditCommand.st
packages/visualgst/Commands/EditMenus/CopyEditCommand.st
packages/visualgst/Commands/EditMenus/PasteEditCommand.st
packages/visualgst/Commands/EditMenus/SelectAllEditCommand.st
packages/visualgst/Commands/EditMenus/FindEditCommand.st
packages/visualgst/Commands/EditMenus/ReplaceEditCommand.st
packages/visualgst/Commands/DebugMenus/DebugCommand.st
packages/visualgst/Commands/DebugMenus/ContinueDebugCommand.st
packages/visualgst/Commands/DebugMenus/StepIntoDebugCommand.st
packages/visualgst/Commands/DebugMenus/StepToDebugCommand.st
packages/visualgst/Menus/MenuBuilder.st
packages/visualgst/Menus/MenuSeparator.st
packages/visualgst/Menus/ToolbarSeparator.st pac
kages/visualgst/Menus/LauncherToolbar.st
packages/visualgst/Menus/DebuggerToolbar.st
packages/visualgst/Menus/NamespaceMenus.st
packages/visualgst/Menus/ClassMenus.st
packages/visualgst/Menus/CategoryMenus.st
packages/visualgst/Menus/ContextMenus.st
packages/visualgst/Menus/MethodMenus.st packages/visualgst/Menus/EditMenus.st
packages/visualgst/Menus/SmalltalkMenus.st
packages/visualgst/Menus/ToolsMenus.st packages/visualgst/Menus/HistoryMenus.st
packages/visualgst/Menus/TabsMenus.st
packages/visualgst/Menus/InspectorMenus.st
packages/visualgst/Menus/TextMenus.st
packages/visualgst/Menus/WorkspaceVariableMenus.st
packages/visualgst/Menus/SimpleWorkspaceMenus.st
packages/visualgst/Menus/WorkspaceMenus.st packages/visualgst/FakeNamespace.st
packages/visualgst/Category/ClassCategory.st
packages/visualgst/Category/AbstractNamespace.st
packages/visualgst/Category/Class.st packages/visualgst/GtkScrollTreeWidget.st
packages/visualgst/GtkSimpleListWidget.st packages/visualgst/GtkEntryWidget
.st packages/visualgst/GtkSidebarWidget.st
packages/visualgst/GtkHSidebarWidget.st packages/visualgst/GtkVSidebarWidget.st
packages/visualgst/Model/GtkColumnType.st
packages/visualgst/Model/GtkColumnTextType.st
packages/visualgst/Model/GtkColumnPixbufType.st
packages/visualgst/Model/GtkColumnOOPType.st packages/visualgst/GtkListModel.st
packages/visualgst/GtkTreeModel.st packages/visualgst/Text/GtkTextWidget.st
packages/visualgst/GtkPackageBuilderWidget.st
packages/visualgst/GtkVisualGSTTool.st packages/visualgst/GtkBrowsingTool.st
packages/visualgst/GtkLauncher.st
packages/visualgst/Text/GtkTextPluginWidget.st
packages/visualgst/Text/GtkFindWidget.st
packages/visualgst/Text/GtkReplaceWidget.st
packages/visualgst/Text/GtkSaveTextWidget.st
packages/visualgst/GtkNotebookWidget.st
packages/visualgst/Image/GtkImageModel.st
packages/visualgst/Image/GtkImageWidget.st
packages/visualgst/Debugger/GtkContextWidget.st
packages/visualgst/Debugger/GtkDebugger.st packages/visualgst/State/Browser
State.st packages/visualgst/State/NamespaceState.st
packages/visualgst/State/ClassState.st
packages/visualgst/State/CategoryState.st
packages/visualgst/State/MethodState.st
packages/visualgst/GtkWorkspaceWidget.st
packages/visualgst/GtkTranscriptWidget.st
packages/visualgst/StBrowser/GtkCategorizedNamespaceWidget.st
packages/visualgst/StBrowser/GtkCategorizedClassWidget.st
packages/visualgst/StBrowser/GtkCategoryWidget.st
packages/visualgst/StBrowser/GtkMethodWidget.st
packages/visualgst/Text/GtkSourceCodeWidget.st
packages/visualgst/StBrowser/GtkClassHierarchyWidget.st
packages/visualgst/GtkHistoryWidget.st
packages/visualgst/Inspector/GtkInspector.st
packages/visualgst/StBrowser/GtkClassBrowserWidget.st
packages/visualgst/HistoryStack.st packages/visualgst/Undo/UndoStack.st
packages/visualgst/Undo/UndoCommand.st
packages/visualgst/Undo/AddNamespaceUndoCommand.st
packages/visualgst/Undo/RenameNamespaceUndoCommand.st
packages/visualgst/Undo/DeleteNamespaceUndoCommand.st packages/vis
ualgst/Source/SourceFormatter.st
packages/visualgst/Source/NamespaceHeaderSource.st
packages/visualgst/Source/NamespaceSource.st
packages/visualgst/Source/ClassHeaderSource.st
packages/visualgst/Source/ClassSource.st
packages/visualgst/Source/CategorySource.st
packages/visualgst/Source/MethodSource.st
packages/visualgst/Source/PackageSource.st
packages/visualgst/Source/BrowserMethodSource.st
packages/visualgst/Undo/AddClassUndoCommand.st
packages/visualgst/Undo/RenameClassUndoCommand.st
packages/visualgst/Undo/DeleteClassUndoCommand.st
packages/visualgst/AbstractFinder.st packages/visualgst/NamespaceFinder.st
packages/visualgst/ClassFinder.st packages/visualgst/MethodFinder.st
packages/visualgst/GtkWebBrowser.st packages/visualgst/GtkWebView.st
packages/visualgst/Extensions.st packages/visualgst/GtkAssistant.st
packages/visualgst/Undo/RenameCategoryUndoCommand.st
packages/visualgst/Undo/AddMethodUndoCommand.st
packages/visualgst/Undo/DeleteMethodUndoCommand.st packages/visualgst/Wor
kspaceVariableTracker.st packages/visualgst/GtkVariableTrackerWidget.st
packages/visualgst/SyntaxHighlighter.st
packages/visualgst/Undo/Text/InsertTextCommand.st
packages/visualgst/Undo/Text/DeleteTextCommand.st
packages/visualgst/Undo/Text/ReplaceTextCommand.st
packages/visualgst/Clock/GtkClock.st
packages/visualgst/Inspector/GtkInspectorSourceWidget.st
packages/visualgst/Inspector/GtkInspectorBrowserWidget.st
packages/visualgst/Inspector/GtkInspectorWidget.st
packages/visualgst/Inspector/GtkObjectInspectorView.st
packages/visualgst/Inspector/GtkCompiledMethodInspectorView.st
packages/visualgst/Inspector/GtkCompiledBlockInspectorView.st
packages/visualgst/Inspector/GtkSequenceableCollectionInspectorView.st
packages/visualgst/Inspector/GtkSetInspectorView.st
packages/visualgst/Inspector/GtkDictionaryInspectorView.st
packages/visualgst/Inspector/GtkCharacterInspectorView.st
packages/visualgst/Inspector/GtkIntegerInspectorView.st
packages/visualgst/Inspector/GtkFloatInspectorView.st p
ackages/visualgst/Implementors/GtkImageResultsWidget.st
packages/visualgst/Implementors/GtkImplementorResultsWidget.st
packages/visualgst/Implementors/GtkSenderResultsWidget.st
packages/visualgst/Notification/Kernel/AbstractNamespace.st
packages/visualgst/Notification/Kernel/Metaclass.st
packages/visualgst/Notification/Kernel/Class.st
packages/visualgst/Notification/Kernel/MethodDictionary.st
packages/visualgst/Debugger/GtkStackInspectorView.st
packages/visualgst/Debugger/GtkStackInspector.st
packages/visualgst/Tetris/HighScores.st packages/visualgst/Tetris/Score.st
packages/visualgst/Tetris/TetrisPieceWidget.st
packages/visualgst/Tetris/BlockWidget.st
packages/visualgst/Tetris/TetrisField.st
packages/visualgst/Tetris/TetrisPiece.st
packages/visualgst/Tetris/TetrisPieceI.st
packages/visualgst/Tetris/TetrisPieceJ.st
packages/visualgst/Tetris/TetrisPieceL.st
packages/visualgst/Tetris/TetrisPieceO.st
packages/visualgst/Tetris/TetrisPieceS.st
packages/visualgst/Tetris/TetrisPieceT.st pa
ckages/visualgst/Tetris/TetrisPieceZ.st packages/visualgst/Tetris/Tetris.st
packages/visualgst/SUnit/TestBacktraceLog.st
packages/visualgst/SUnit/GtkSUnitResultWidget.st
packages/visualgst/GtkClassSUnitWidget.st
packages/visualgst/GtkMethodSUnitWidget.st packages/visualgst/SUnit/GtkSUnit.st
packages/visualgst/Commands/OpenBrowserCommand.st
packages/visualgst/Commands/OpenTabbedBrowserCommand.st
packages/visualgst/Commands/ToolsMenus/OpenSUnitCommand.st
packages/visualgst/Commands/ToolsMenus/OpenBottomPaneCommand.st
packages/visualgst/Commands/OpenWorkspaceCommand.st
packages/visualgst/Commands/ToolsMenus/OpenImplementorCommand.st
packages/visualgst/Commands/ToolsMenus/OpenSenderCommand.st
packages/visualgst/Commands/ToolsMenus/OpenPackageBuilderCommand.st
packages/visualgst/Commands/SaveImageCommand.st
packages/visualgst/Commands/SaveImageAsCommand.st
packages/visualgst/Commands/InspectorMenus/InspectorBackCommand.st
packages/visualgst/Commands/InspectorMenus/InspectorDiveCommand.st
packages/visualgst/Commands/WorkspaceMenus/DeleteItemCommand.st
packages/visualgst/Commands/WorkspaceMenus/InspectItemCommand.st
packages/visualgst/Commands/WorkspaceMenus/WorkspaceVariableCommand.st
packages/visualgst/Icons/category.gif packages/visualgst/Icons/namespace.gif
packages/visualgst/Icons/go-bottom.png packages/visualgst/Icons/go-down.png
packages/visualgst/Icons/go-first.png packages/visualgst/Icons/go-home.png
packages/visualgst/Icons/go-jump.png packages/visualgst/Icons/go-last.png
packages/visualgst/Icons/go-next.png packages/visualgst/Icons/go-previous.png
packages/visualgst/Icons/go-run.png packages/visualgst/Icons/go-top.png
packages/visualgst/Icons/go-up.png packages/visualgst/Icons/NUnit.Failed.png
packages/visualgst/Icons/NUnit.Loading.png
packages/visualgst/Icons/NUnit.None.png
packages/visualgst/Icons/NUnit.NotRun.png
packages/visualgst/Icons/NUnit.Running.png
packages/visualgst/Icons/NUnit.SuccessAndFailed.png
packages/visualgst/Icons/NUnit.Success.png pack
ages/visualgst/Icons/extension.png packages/visualgst/Icons/overridden.png
packages/visualgst/Icons/override.png packages/visualgst/Icons/visualgst.png
packages/visualgst/Tests/AddNamespaceUndoCommandTest.st
packages/visualgst/Tests/GtkMethodWidgetTest.st
packages/visualgst/Tests/CompiledMethodTest.st
packages/visualgst/Tests/ExtractLiteralsTest.st
packages/visualgst/Tests/CategoryTest.st
packages/visualgst/Tests/GtkScrollTreeWidgetTest.st
packages/visualgst/Tests/MenuBuilderTest.st
packages/visualgst/Tests/GtkAssistantTest.st
packages/visualgst/Tests/GtkSimpleListWidgetTest.st
packages/visualgst/Tests/EmptyTest.st
packages/visualgst/Tests/AddClassUndoCommandTest.st
packages/visualgst/Tests/GtkCategoryWidgetTest.st
packages/visualgst/Tests/StateTest.st packages/visualgst/Tests/FinderTest.st
packages/visualgst/Tests/PragmaTest.st
packages/visualgst/Tests/GtkCategorizedNamespaceWidgetTest.st
packages/visualgst/Tests/GtkCategorizedClassWidgetTest.st
$(VisualGST_FILES):
$(srcdir)/packages/visualgst/stamp-classes: $(VisualGST_FILES)
touch $(srcdir)/packages/visualgst/stamp-classes
diff --git a/packages/visualgst/SUnit/GtkSUnitResultWidget.st
b/packages/visualgst/SUnit/GtkSUnitResultWidget.st
index 9a9122e..9357e49 100644
--- a/packages/visualgst/SUnit/GtkSUnitResultWidget.st
+++ b/packages/visualgst/SUnit/GtkSUnitResultWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkSUnitResult [
+GTKTools.GtkConcreteWidget subclass: GtkSUnitResult [
| model resultTree results |
initialize [
<category: 'initialization'>
diff --git a/packages/visualgst/StBrowser/GtkCategorizedClassWidget.st
b/packages/visualgst/StBrowser/GtkCategorizedClassWidget.st
index 270db8c..351532e 100644
--- a/packages/visualgst/StBrowser/GtkCategorizedClassWidget.st
+++ b/packages/visualgst/StBrowser/GtkCategorizedClassWidget.st
@@ -6,7 +6,7 @@ Smalltalk.String extend [
]
]
-GtkConcreteWidget subclass: GtkCategorizedClassWidget [
+GTKTools.GtkConcreteWidget subclass: GtkCategorizedClassWidget [
| classesTree column model namespace category |
GtkCategorizedClassWidget >> on: aNamespace [
diff --git a/packages/visualgst/StBrowser/GtkCategorizedNamespaceWidget.st
b/packages/visualgst/StBrowser/GtkCategorizedNamespaceWidget.st
index 62f4ca0..5498756 100644
--- a/packages/visualgst/StBrowser/GtkCategorizedNamespaceWidget.st
+++ b/packages/visualgst/StBrowser/GtkCategorizedNamespaceWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkCategorizedNamespaceWidget [
+GTKTools.GtkConcreteWidget subclass: GtkCategorizedNamespaceWidget [
| namespaceTree model |
initialize [
diff --git a/packages/visualgst/StBrowser/GtkCategoryWidget.st
b/packages/visualgst/StBrowser/GtkCategoryWidget.st
index 4f1288b..8a0196c 100644
--- a/packages/visualgst/StBrowser/GtkCategoryWidget.st
+++ b/packages/visualgst/StBrowser/GtkCategoryWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkCategoryWidget [
+GTKTools.GtkConcreteWidget subclass: GtkCategoryWidget [
| categoryTree categories model class |
GtkCategoryWidget >> on: aClass [
diff --git a/packages/visualgst/StBrowser/GtkClassBrowserWidget.st
b/packages/visualgst/StBrowser/GtkClassBrowserWidget.st
index b491940..ba23e86 100644
--- a/packages/visualgst/StBrowser/GtkClassBrowserWidget.st
+++ b/packages/visualgst/StBrowser/GtkClassBrowserWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkClassBrowserWidget [
+GTKTools.GtkConcreteWidget subclass: GtkClassBrowserWidget [
GtkClassBrowserWidget class [ | Undo | ]
| launcher checkCode namespaceWidget classWidget classHierarchyWidget
classHierarchyUpdate iCategoryWidget iMethodWidget cCategoryWidget
cMethodWidget classAndInstanceSide codeWidget historyStack state |
diff --git a/packages/visualgst/StBrowser/GtkClassHierarchyWidget.st
b/packages/visualgst/StBrowser/GtkClassHierarchyWidget.st
index 1b85188..0f947ef 100644
--- a/packages/visualgst/StBrowser/GtkClassHierarchyWidget.st
+++ b/packages/visualgst/StBrowser/GtkClassHierarchyWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkClassHierarchyWidget [
+GTKTools.GtkConcreteWidget subclass: GtkClassHierarchyWidget [
| root dic classesTree model classOrMeta |
GtkClassHierarchyWidget >> on: aClass [
diff --git a/packages/visualgst/StBrowser/GtkMethodWidget.st
b/packages/visualgst/StBrowser/GtkMethodWidget.st
index f230175..3b4cd4f 100644
--- a/packages/visualgst/StBrowser/GtkMethodWidget.st
+++ b/packages/visualgst/StBrowser/GtkMethodWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkMethodWidget [
+GTKTools.GtkConcreteWidget subclass: GtkMethodWidget [
| browser model methodTree class category |
GtkMethodWidget >> on: aClass withCategory: aCategory [
diff --git a/packages/visualgst/Tests/GtkConcreteWidgetTest.st
b/packages/visualgst/Tests/GtkConcreteWidgetTest.st
deleted file mode 100644
index 37fd7be..0000000
--- a/packages/visualgst/Tests/GtkConcreteWidgetTest.st
+++ /dev/null
@@ -1,43 +0,0 @@
-TestCase subclass: GtkConcreteWidgetTest [
-
- | show |
-
- showAll [
-
- show := true
- ]
-
- hideAll [
-
- show := false
- ]
-
- getVisible [
-
- ^ false
- ]
-
- testAbstractWidget [
- <category: 'testing'>
-
- self should: [ GtkAbstractConcreteWidget new hideAll. true ]
- ]
-
- testConcreteWidget [
- <category: 'testing'>
-
- | widget |
- widget := GtkConcreteWidget parentWindow: #foo.
- self assert: widget parentWindow = #foo.
- widget mainWidget: self.
- self assert: widget mainWidget = self.
- widget showAll.
- self assert: show.
- widget hideAll.
- self assert: show not.
- self assert: widget isVisible not.
- self should: [ widget grabFocus. true ].
- self should: [ widget close. true].
- ]
-]
-
diff --git a/packages/visualgst/Tetris/Tetris.st
b/packages/visualgst/Tetris/Tetris.st
index 04856fb..c0c50de 100644
--- a/packages/visualgst/Tetris/Tetris.st
+++ b/packages/visualgst/Tetris/Tetris.st
@@ -27,7 +27,7 @@
|
======================================================================"
-GtkMainWindow subclass: Tetris [
+GTKTools.GtkMainWindow subclass: Tetris [
| canvasWidget canvas process pause delay grid movingBlocks level score
level lines |
<category: 'Graphics-Tetris'>
diff --git a/packages/visualgst/Text/GtkTextPluginWidget.st
b/packages/visualgst/Text/GtkTextPluginWidget.st
index 88068c5..1dbb200 100644
--- a/packages/visualgst/Text/GtkTextPluginWidget.st
+++ b/packages/visualgst/Text/GtkTextPluginWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkTextPluginWidget [
+GTKTools.GtkConcreteWidget subclass: GtkTextPluginWidget [
| textWidget closeButton |
GtkTextPluginWidget class >> on: aTextWidget [
diff --git a/packages/visualgst/Text/GtkTextWidget.st
b/packages/visualgst/Text/GtkTextWidget.st
index 4c08498..8559c04 100644
--- a/packages/visualgst/Text/GtkTextWidget.st
+++ b/packages/visualgst/Text/GtkTextWidget.st
@@ -1,4 +1,4 @@
-GtkConcreteWidget subclass: GtkTextWidget [
+GTKTools.GtkConcreteWidget subclass: GtkTextWidget [
| findWidget replaceWidget textWidget userAction undoStack lastCommand cut
textSaved lastSavedCommand |
GtkTextWidget class >> newWithBuffer: aGtkTextBuffer [
diff --git a/packages/visualgst/package.xml b/packages/visualgst/package.xml
index 4267d1d..91a2415 100644
--- a/packages/visualgst/package.xml
+++ b/packages/visualgst/package.xml
@@ -3,6 +3,7 @@
<namespace>VisualGST</namespace>
<prereq>Parser</prereq>
<prereq>GTK</prereq>
+ <prereq>GTKTools</prereq>
<prereq>Cairo</prereq>
<prereq>SUnit</prereq>
<prereq>DebugTools</prereq>
@@ -26,7 +27,6 @@
<filein>Tests/PragmaTest.st</filein>
<filein>Tests/GtkCategorizedNamespaceWidgetTest.st</filein>
<filein>Tests/GtkCategorizedClassWidgetTest.st</filein>
- <filein>Tests/GtkConcreteWidgetTest.st</filein>
<file>Tests/AddNamespaceUndoCommandTest.st</file>
<file>Tests/GtkMethodWidgetTest.st</file>
<file>Tests/CompiledMethodTest.st</file>
@@ -44,7 +44,6 @@
<file>Tests/PragmaTest.st</file>
<file>Tests/GtkCategorizedNamespaceWidgetTest.st</file>
<file>Tests/GtkCategorizedClassWidgetTest.st</file>
- <file>Tests/GtkConcreteWidgetTest.st</file>
<sunit>
VisualGST.AddNamespaceUndoCommandTest
VisualGST.GtkMethodWidgetTest
@@ -65,7 +64,6 @@
VisualGST.GtkCategorizedNamespaceWidgetTest
VisualGST.GtkCategorizedClassWidgetTest
VisualGST.#Test
- VisualGST.GtkConcreteWidgetTest
</sunit>
</test>
<filein>Extensions.st</filein>
@@ -159,8 +157,6 @@
<filein>Category/ClassCategory.st</filein>
<filein>Category/AbstractNamespace.st</filein>
<filein>Category/Class.st</filein>
- <filein>GtkAbstractConcreteWidget.st</filein>
- <filein>GtkConcreteWidget.st</filein>
<filein>GtkScrollTreeWidget.st</filein>
<filein>GtkSimpleListWidget.st</filein>
<filein>GtkEntryWidget.st</filein>
@@ -175,7 +171,6 @@
<filein>GtkTreeModel.st</filein>
<filein>Text/GtkTextWidget.st</filein>
<filein>GtkPackageBuilderWidget.st</filein>
- <filein>GtkMainWindow.st</filein>
<filein>GtkVisualGSTTool.st</filein>
<filein>GtkBrowsingTool.st</filein>
<filein>GtkLauncher.st</filein>
@@ -204,7 +199,6 @@
<filein>GtkHistoryWidget.st</filein>
<filein>Inspector/GtkInspector.st</filein>
<filein>StBrowser/GtkClassBrowserWidget.st</filein>
- <filein>GtkEntryDialog.st</filein>
<filein>HistoryStack.st</filein>
<filein>Undo/UndoStack.st</filein>
<filein>Undo/UndoCommand.st</filein>
@@ -385,8 +379,6 @@
<file>Category/ClassCategory.st</file>
<file>Category/AbstractNamespace.st</file>
<file>Category/Class.st</file>
- <file>GtkAbstractConcreteWidget.st</file>
- <file>GtkConcreteWidget.st</file>
<file>GtkScrollTreeWidget.st</file>
<file>GtkSimpleListWidget.st</file>
<file>GtkEntryWidget.st</file>
@@ -401,7 +393,6 @@
<file>GtkTreeModel.st</file>
<file>Text/GtkTextWidget.st</file>
<file>GtkPackageBuilderWidget.st</file>
- <file>GtkMainWindow.st</file>
<file>GtkVisualGSTTool.st</file>
<file>GtkBrowsingTool.st</file>
<file>GtkLauncher.st</file>
@@ -430,7 +421,6 @@
<file>GtkHistoryWidget.st</file>
<file>Inspector/GtkInspector.st</file>
<file>StBrowser/GtkClassBrowserWidget.st</file>
- <file>GtkEntryDialog.st</file>
<file>HistoryStack.st</file>
<file>Undo/UndoStack.st</file>
<file>Undo/UndoCommand.st</file>
--
1.7.10.4
- [Help-smalltalk] [PATCH 04/15] kernel: Remove unused variable from the StarPackage class, (continued)
- [Help-smalltalk] [PATCH 04/15] kernel: Remove unused variable from the StarPackage class, Holger Hans Peter Freyther, 2013/04/08
- [Help-smalltalk] [PATCH 02/15] misc: Fix compiler warnings in libgst., Holger Hans Peter Freyther, 2013/04/08
- [Help-smalltalk] [PATCH 07/15] stinst: Fix parsing of negated numbers with the new RBNumberLiteralToken, Holger Hans Peter Freyther, 2013/04/08
- [Help-smalltalk] [PATCH 05/15] kernel: Introduce the DirPackage packages to help with development, Holger Hans Peter Freyther, 2013/04/08
- [Help-smalltalk] [PATCH 10/15] gtktools: Move GtkListModel from VisualGST to GTKTools, Holger Hans Peter Freyther, 2013/04/08
- [Help-smalltalk] [PATCH 09/15] gtktools: Introduce a GTKTools package with helper classes,
Holger Hans Peter Freyther <=
- [Help-smalltalk] [PATCH 15/15] tooling: Introduce a helper for a Monticello export, Holger Hans Peter Freyther, 2013/04/08
- [Help-smalltalk] [PATCH 11/15] gtktools: Move the GtkSideBarWidget from VisualGST to GTKTools, Holger Hans Peter Freyther, 2013/04/08
- [Help-smalltalk] [PATCH 14/15] tooling: Introduce a new package for tooling helpers, Holger Hans Peter Freyther, 2013/04/08
- [Help-smalltalk] [PATCH 12/15] gtktools: Move model classes from VisualGST to GTKTools, Holger Hans Peter Freyther, 2013/04/08