equal
deleted
inserted
replaced
79 ! ! |
79 ! ! |
80 |
80 |
81 !WorkingCopy class methodsFor:'others'! |
81 !WorkingCopy class methodsFor:'others'! |
82 |
82 |
83 version_CVS |
83 version_CVS |
84 ^ '$ÂHeader: /cvs/stx/stx/libsvn/SVN__WorkingCopy.st,v 1.4 2009/10/19 12:21:31 fm Exp Â$' |
84 ^ '$Header$' |
85 ! ! |
85 ! ! |
86 |
86 |
87 !WorkingCopy methodsFor:'accessing'! |
87 !WorkingCopy methodsFor:'accessing'! |
88 |
88 |
89 branch |
89 branch |
446 "Keep all directories" |
446 "Keep all directories" |
447 path directoryContents do: |
447 path directoryContents do: |
448 [:f| |
448 [:f| |
449 (f ~= '.svn' and: [(path / f) isDirectory]) ifTrue: |
449 (f ~= '.svn' and: [(path / f) isDirectory]) ifTrue: |
450 [containers add: f]]. |
450 [containers add: f]]. |
|
451 "Keep all .st files that are for with other operating systems" |
|
452 |
|
453 self packageDefinition classNamesAndAttributesDo: [:nm :attributes| |
|
454 attributes do:[:attr| |
|
455 (#(win32 unix vms autoload) includes: attr) ifTrue:[ |
|
456 containers add: ((SVN::Repository containerNameWithoutSuffixForClassNamed: nm) , '.st') |
|
457 ] |
|
458 ] |
|
459 ]. |
|
460 |
451 |
461 |
452 ^containers asSet. |
462 ^containers asSet. |
453 |
463 |
454 "Created: / 12-06-2009 / 21:27:12 / Jan Vrany <vranyj1@fel.cvut.cz>" |
464 "Created: / 12-06-2009 / 21:27:12 / Jan Vrany <vranyj1@fel.cvut.cz>" |
455 "Modified: / 19-12-2010 / 18:47:26 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
465 "Modified: / 28-09-2011 / 17:15:46 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
456 ! |
466 ! |
457 |
467 |
458 containersWriteStreamForClass:cls |
468 containersWriteStreamForClass:cls |
459 |
469 |
460 ^self containerWriteStreamFor: (repository containerNameForClass:cls) |
470 ^self containerWriteStreamFor: (repository containerNameForClass:cls) |
993 "Modified: / 16-07-2009 / 13:57:03 / Jan Vrany <vranyj1@fel.cvut.cz>" |
1003 "Modified: / 16-07-2009 / 13:57:03 / Jan Vrany <vranyj1@fel.cvut.cz>" |
994 ! ! |
1004 ! ! |
995 |
1005 |
996 !WorkingCopy class methodsFor:'documentation'! |
1006 !WorkingCopy class methodsFor:'documentation'! |
997 |
1007 |
|
1008 version |
|
1009 ^ '$Header$' |
|
1010 ! |
|
1011 |
998 version_SVN |
1012 version_SVN |
999 ^ '§Id: SVN__WorkingCopy.st 353 2011-07-07 20:51:28Z vranyj1 §' |
1013 ^ '§Id: SVN__WorkingCopy.st 371 2011-09-28 18:47:07Z vranyj1 §' |
1000 ! ! |
1014 ! ! |