--- a/ApplicationModel.st Sat Feb 11 11:48:15 2017 +0100
+++ b/ApplicationModel.st Sat Feb 11 15:08:38 2017 +0100
@@ -804,7 +804,16 @@
RecentlyOpenedApplications isNil ifTrue:[
RecentlyOpenedApplications := OrderedCollection new.
].
- RecentlyOpenedApplications removeAndAddFirst:myName.
+
+ #FIXME.
+ "/ wait for 2.12 with this - otherwise, we need a whole lot of retagging
+ "/ due to the new SeqCollection...
+
+ "/ RecentlyOpenedApplications removeAndAddFirst:myName.
+ RecentlyOpenedApplications remove:(self name) ifAbsent:[].
+ RecentlyOpenedApplications addFirst:(self name).
+
+ "Modified: / 11-02-2017 / 15:05:20 / cg"
! !
!ApplicationModel class methodsFor:'private'!