--- a/Tools_OrganizerCanvas.st	Tue Apr 27 19:28:38 2010 +0200
+++ b/Tools_OrganizerCanvas.st	Wed Apr 28 08:17:41 2010 +0200
@@ -4789,7 +4789,7 @@
 
     self packageDiagramShown computeValue ifTrue:[
         diagramApp := self diagramApplicationModelHolder value.
-        selectedClasses := self selectedClasses value.
+        selectedClasses := self selectedClasses value ? #().
 
         packages := self selectedProjects value ? #().
         packages isEmpty ifTrue:[
@@ -4808,6 +4808,8 @@
             ]
         ]
     ].
+
+    "Modified: / 28-04-2010 / 08:16:55 / cg"
 !
 
 updateProjectSelectionFromClasses
@@ -4939,9 +4941,9 @@
 !OrganizerCanvas class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_OrganizerCanvas.st,v 1.41 2010-04-27 15:29:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_OrganizerCanvas.st,v 1.42 2010-04-28 06:17:41 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_OrganizerCanvas.st,v 1.41 2010-04-27 15:29:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_OrganizerCanvas.st,v 1.42 2010-04-28 06:17:41 cg Exp $'
 ! !