ChangeSet.st
changeset 3483 e2eff8ad70c3
parent 3445 71962ba45fb7
child 3518 1b770a65ef66
--- a/ChangeSet.st	Wed Feb 05 19:01:19 2014 +0100
+++ b/ChangeSet.st	Wed Feb 05 19:05:27 2014 +0100
@@ -474,6 +474,7 @@
         | files |
 
         files := OrderedCollection new.
+        files add:'extensions.st'.
         (directory asFilename / 'abbrev.stc') readingFileDo:[:s |
             Smalltalk withAbbreviationsFromStream: s do:[:className :abbrev :pkg  | files add: (abbrev , '.st')]
         ].
@@ -484,6 +485,7 @@
     ^ self fromDirectory: aStringOfFilename filter: filter
 
     "Created: / 02-12-2013 / 17:36:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 05-02-2014 / 19:05:14 / cg"
 !
 
 fromDirectory: aStringOrFilename filter: filter
@@ -3930,7 +3932,7 @@
 !
 
 version_SVN
-    ^ '$Id: ChangeSet.st,v 1.236 2014-02-05 17:51:55 cg Exp $'
+    ^ '$Id: ChangeSet.st,v 1.237 2014-02-05 18:05:27 cg Exp $'
 ! !
 
 !ChangeSet::ClassSourceWriter::ClassInfo class methodsFor:'instance creation'!
@@ -4595,11 +4597,11 @@
 !ChangeSet class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.236 2014-02-05 17:51:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.237 2014-02-05 18:05:27 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.236 2014-02-05 17:51:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.237 2014-02-05 18:05:27 cg Exp $'
 !
 
 version_HG
@@ -4608,6 +4610,6 @@
 !
 
 version_SVN
-    ^ '$Id: ChangeSet.st,v 1.236 2014-02-05 17:51:55 cg Exp $'
+    ^ '$Id: ChangeSet.st,v 1.237 2014-02-05 18:05:27 cg Exp $'
 ! !