equal
deleted
inserted
replaced
837 unixPath := path name. |
837 unixPath := path name. |
838 ] ifFalse:[ |
838 ] ifFalse:[ |
839 OperatingSystem isVMSlike ifTrue:[ |
839 OperatingSystem isVMSlike ifTrue:[ |
840 self error:'VMS case not yet implemented' |
840 self error:'VMS case not yet implemented' |
841 ]. |
841 ]. |
842 unixPath := path name copyReplaceAll:$\ with:$/ |
842 unixPath := path name asUnixFilenameString |
843 ]. |
843 ]. |
844 |
844 |
845 (self checkOut:unixPath module:moduleDir in:tempdir) ifFalse:[ |
845 (self checkOut:unixPath module:moduleDir in:tempdir) ifFalse:[ |
846 "dummy file does not exist, so create it" |
846 "dummy file does not exist, so create it" |
847 |
847 |
5444 ! ! |
5444 ! ! |
5445 |
5445 |
5446 !CVSSourceCodeManager class methodsFor:'documentation'! |
5446 !CVSSourceCodeManager class methodsFor:'documentation'! |
5447 |
5447 |
5448 version |
5448 version |
5449 ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.486 2014-06-14 09:30:40 cg Exp $' |
5449 ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.487 2014-07-11 00:23:07 cg Exp $' |
5450 ! |
5450 ! |
5451 |
5451 |
5452 version_CVS |
5452 version_CVS |
5453 ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.486 2014-06-14 09:30:40 cg Exp $' |
5453 ^ '$Header: /cvs/stx/stx/libbasic3/CVSSourceCodeManager.st,v 1.487 2014-07-11 00:23:07 cg Exp $' |
5454 ! ! |
5454 ! ! |
5455 |
5455 |
5456 |
5456 |
5457 CVSSourceCodeManager initialize! |
5457 CVSSourceCodeManager initialize! |