SVN__WorkingCopy.st
changeset 905 58dc08c9d3b4
parent 795 79b13f902c1b
child 970 821fe8d5f76d
--- a/SVN__WorkingCopy.st	Sat Oct 01 13:29:27 2011 +0200
+++ b/SVN__WorkingCopy.st	Sat Oct 01 13:30:00 2011 +0200
@@ -81,7 +81,7 @@
 !WorkingCopy class methodsFor:'others'!
 
 version_CVS
-    ^ '$ÂHeader: /cvs/stx/stx/libsvn/SVN__WorkingCopy.st,v 1.4 2009/10/19 12:21:31 fm Exp Â$'
+    ^ '$Header$'
 ! !
 
 !WorkingCopy methodsFor:'accessing'!
@@ -448,11 +448,21 @@
         [:f|
         (f ~= '.svn' and: [(path / f) isDirectory]) ifTrue:
             [containers add: f]].
+    "Keep all .st files that are for with other operating systems"
+
+    self packageDefinition classNamesAndAttributesDo: [:nm :attributes|
+        attributes do:[:attr|
+            (#(win32 unix vms autoload) includes: attr) ifTrue:[
+                containers add: ((SVN::Repository containerNameWithoutSuffixForClassNamed: nm) , '.st')
+            ]
+        ]
+    ].
+
 
     ^containers asSet.
 
     "Created: / 12-06-2009 / 21:27:12 / Jan Vrany <vranyj1@fel.cvut.cz>"
-    "Modified: / 19-12-2010 / 18:47:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 28-09-2011 / 17:15:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 containersWriteStreamForClass:cls 
@@ -995,6 +1005,10 @@
 
 !WorkingCopy class methodsFor:'documentation'!
 
+version
+    ^ '$Header$'
+!
+
 version_SVN
-    ^ '§Id: SVN__WorkingCopy.st 353 2011-07-07 20:51:28Z vranyj1 §'
+    ^ '§Id: SVN__WorkingCopy.st 371 2011-09-28 18:47:07Z vranyj1 §'
 ! !