Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Mon, 30 Jan 2006 19:17:56 +0100
changeset 6509 bcaae26df254
parent 6508 ec11a54c72ee
child 6510 7c2651d8ec31
*** empty log message ***
ClassVariablesInspectorView.st file | annotate | diff | comparison | revisions
MultiViewToolApplication.st file | annotate | diff | comparison | revisions
SmalltalkInspectorView.st file | annotate | diff | comparison | revisions
resources/WorkspaceApplication_de.rs file | annotate | diff | comparison | revisions 
--- a/ClassVariablesInspectorView.st	Mon Jan 30 19:13:25 2006 +0100
+++ b/ClassVariablesInspectorView.st	Mon Jan 30 19:17:56 2006 +0100
@@ -45,8 +45,23 @@
 "
 ! !
 
+!ClassVariablesInspectorView methodsFor:'private'!
+
+indexList
+    "redefined to only show class variables"
+
+    keys := OrderedCollection new.
+    inspectedObject keysDo:[:k |
+                                (Smalltalk keyIsClassVariableNameKey:k) ifTrue:[
+                                    keys add:k
+                                ]
+                           ].
+    keys := keys asSortedCollection:[:a :b | a displayString < b displayString].
+    ^ keys
+! !
+
 !ClassVariablesInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ClassVariablesInspectorView.st,v 1.1 2006-01-30 17:43:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ClassVariablesInspectorView.st,v 1.2 2006-01-30 18:17:56 cg Exp $'
 ! !
--- a/MultiViewToolApplication.st	Mon Jan 30 19:13:25 2006 +0100
+++ b/MultiViewToolApplication.st	Mon Jan 30 19:17:56 2006 +0100
@@ -265,7 +265,7 @@
     |tabList newWsIndex|
 
     wsIndex == self selectedWorkspaceIndexHolder value ifTrue:[
-        (self askIfModified:'Text was modified. Remove anyway ?' yesButton:'Remove') ifFalse:[
+        (self askIfModified:'Text was modified. Remove buffer anyway ?' yesButton:'Remove Buffer') ifFalse:[
             ^ self
         ].
     ].
@@ -459,5 +459,5 @@
 !MultiViewToolApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/MultiViewToolApplication.st,v 1.8 2005-12-27 16:28:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/MultiViewToolApplication.st,v 1.9 2006-01-30 18:17:10 cg Exp $'
 ! !
--- a/SmalltalkInspectorView.st	Mon Jan 30 19:13:25 2006 +0100
+++ b/SmalltalkInspectorView.st	Mon Jan 30 19:17:56 2006 +0100
@@ -44,8 +44,23 @@
 "
 ! !
 
+!SmalltalkInspectorView methodsFor:'private'!
+
+indexList
+    "redefined to not show class variables"
+
+    keys := OrderedCollection new.
+    inspectedObject keysDo:[:k |
+                                (Smalltalk keyIsClassVariableNameKey:k) ifFalse:[
+                                    keys add:k
+                                ]
+                           ].
+    keys := keys asSortedCollection:[:a :b | a displayString < b displayString].
+    ^ keys
+! !
+
 !SmalltalkInspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkInspectorView.st,v 1.1 2006-01-30 17:44:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SmalltalkInspectorView.st,v 1.2 2006-01-30 18:17:19 cg Exp $'
 ! !
--- a/resources/WorkspaceApplication_de.rs	Mon Jan 30 19:13:25 2006 +0100
+++ b/resources/WorkspaceApplication_de.rs	Mon Jan 30 19:17:56 2006 +0100
@@ -1,6 +1,6 @@
 #encoding iso8859-1
 
-; $Header: /cvs/stx/stx/libtool/resources/Attic/WorkspaceApplication_de.rs,v 1.10 2005-06-21 14:37:39 cg Exp $
+; $Header: /cvs/stx/stx/libtool/resources/Attic/WorkspaceApplication_de.rs,v 1.11 2006-01-30 18:16:51 cg Exp $
 ;
 ; German Workspace resources
 ;
@@ -19,6 +19,7 @@
 'Add Buffer'                        'Seite hinzufügen'
 'Add Buffer on Workspace Variables' 'Seite mit Workspace Variablen hinzufügen'
 'Add Buffer on Global Variables'    'Seite mit Globalen Variablen hinzufügen'
+'Add Buffer on Class Variables'     'Seite mit Klassenvariablen hinzufügen'
 'Remove Buffer'                     'Seite entfernen'
 'Add Tab'                           'Tab hinzufügen'
 'Remove Tab'                        'Tab entfernen'
@@ -41,9 +42,10 @@
 'Redo Last'                             'Letzte Anweisung wiederholen'
 'Paste Last'                            'Letzte Anweisung einfügen'
 
-'Text was not saved. Close anyway ?'    'Text wurde nicht gesichert. Dennoch schließen ?'
-'Text was modified. Load anyway ?'      'Text wurde geändert. Dennoch laden ?'
-'Clear History'                         'Historie löschen'
+'Text was not saved. Close anyway ?'            'Text wurde nicht gesichert. Dennoch schließen ?'
+'Text was modified. Load anyway ?'              'Text wurde geändert. Dennoch laden ?'
+'Text was modified. Remove buffer anyway ?'     'Text wurde geändert. Seite dennoch entfernen ?'
+'Clear History'                                 'Historie löschen'
 
 'Select All'                            'Alles Markieren'
 'Google Spell'                          'Google Rechtschreibhilfe'
hg/stx-libtool