equal
deleted
inserted
replaced
864 If aGlobString ist not empty or nil, only patches matching the glob |
864 If aGlobString ist not empty or nil, only patches matching the glob |
865 pattern are loaded. E.g. '[0-9]*.chg'" |
865 pattern are loaded. E.g. '[0-9]*.chg'" |
866 |
866 |
867 |patchesDir prevMode patchesToLoad| |
867 |patchesDir prevMode patchesToLoad| |
868 |
868 |
869 patchesDir := self patchesDirectory. |
869 patchesDir := self patchesDirectory asFilename. |
870 patchesDir isDirectory ifTrue:[ |
870 patchesDir isDirectory ifTrue:[ |
871 prevMode := ClassCategoryReader sourceMode. |
871 prevMode := ClassCategoryReader sourceMode. |
872 ClassCategoryReader sourceMode:#discard. |
872 ClassCategoryReader sourceMode:#discard. |
873 [ |
873 [ |
874 patchesToLoad := patchesDir directoryContentsAsFilenames. |
874 patchesToLoad := patchesDir directoryContentsAsFilenames. |
1219 ! ! |
1219 ! ! |
1220 |
1220 |
1221 !StandaloneStartup class methodsFor:'documentation'! |
1221 !StandaloneStartup class methodsFor:'documentation'! |
1222 |
1222 |
1223 version |
1223 version |
1224 ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.91 2015-03-29 01:07:59 cg Exp $' |
1224 ^ '$Header$' |
1225 ! |
1225 ! |
1226 |
1226 |
1227 version_CVS |
1227 version_CVS |
1228 ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.91 2015-03-29 01:07:59 cg Exp $' |
1228 ^ '$Header$' |
1229 ! ! |
1229 ! ! |
1230 |
1230 |
1231 |
1231 |
1232 StandaloneStartup initialize! |
1232 StandaloneStartup initialize! |