--- a/SettingsDialog.st Tue Sep 17 11:25:54 2013 +0100
+++ b/SettingsDialog.st Thu Sep 19 10:20:29 2013 +0100
@@ -1329,8 +1329,10 @@
entry := applicationList root
recursiveDetect:[:entry | entry applicationClass = aClass].
- entry makeVisible.
- self selectedItem value:entry
+ entry notNil ifTrue:[
+ entry makeVisible.
+ self selectedItem value:entry
+ ].
"Created: / 29-10-2010 / 11:54:13 / cg"
!
@@ -1340,8 +1342,10 @@
entry := applicationList root
recursiveDetect:[:entry | entry nameString = aPathString].
- entry makeVisible.
- self selectedItem value:entry
+ entry notNil ifTrue:[
+ entry makeVisible.
+ self selectedItem value:entry
+ ].
!
selectionChanged
@@ -1629,8 +1633,6 @@
aGCOrStream nextPut:$].
!
-
-
printOn:aStream
aStream
nextPutAll:self class nameWithoutPrefix;
@@ -1638,9 +1640,7 @@
self label printOn:aStream.
"Created: / 24-08-2010 / 18:36:17 / sr"
-!
-
- !
+! !
!SettingsDialog::HierarchicalApplicationList::ApplicationItem methodsFor:'queries'!
@@ -1800,11 +1800,11 @@
!SettingsDialog class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.108 2013-08-19 16:02:12 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.109 2013-09-11 11:51:33 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.108 2013-08-19 16:02:12 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.109 2013-09-11 11:51:33 cg Exp $'
!
version_HG