equal
deleted
inserted
replaced
240 " |
240 " |
241 ResourcePack fromFile:'SBrowser.rs' |
241 ResourcePack fromFile:'SBrowser.rs' |
242 ResourcePack fromFile:'FBrowser.rs' |
242 ResourcePack fromFile:'FBrowser.rs' |
243 ResourcePack fromFile:'Smalltalk.rs' |
243 ResourcePack fromFile:'Smalltalk.rs' |
244 ResourcePack fromFile:'Smalltalk.rs' asFilename |
244 ResourcePack fromFile:'Smalltalk.rs' asFilename |
|
245 ResourcePack fromFile:'../../libtool/resources/AboutBox_ru.rs' asFilename |
245 " |
246 " |
246 ! |
247 ! |
247 |
248 |
248 fromFile:aFileName directory:dirName |
249 fromFile:aFileName directory:dirName |
249 "get the resource definitions from a file in a directory. |
250 "get the resource definitions from a file in a directory. |
837 ] |
838 ] |
838 ] |
839 ] |
839 ] ifFalse:[ |
840 ] ifFalse:[ |
840 (lineString startsWith:'encoding') ifTrue:[ |
841 (lineString startsWith:'encoding') ifTrue:[ |
841 rest := lineString copyFrom:9. |
842 rest := lineString copyFrom:9. |
842 encoding := rest withoutSeparators asSymbol |
843 rest := rest withoutSeparators. |
|
844 (rest startsWith:'#') ifTrue:[ |
|
845 rest := rest copyFrom:2. |
|
846 ]. |
|
847 (rest startsWith:'''') ifTrue:[ |
|
848 rest := rest copyFrom:2. |
|
849 (rest endsWith:'''') ifTrue:[ |
|
850 rest := rest copyWithoutLast:1. |
|
851 ]. |
|
852 ]. |
|
853 encoding := rest asSymbol. |
843 ] |
854 ] |
844 ] |
855 ] |
845 ] |
856 ] |
846 ] |
857 ] |
847 ] |
858 ] |
878 ! ! |
889 ! ! |
879 |
890 |
880 !ResourcePack class methodsFor:'documentation'! |
891 !ResourcePack class methodsFor:'documentation'! |
881 |
892 |
882 version |
893 version |
883 ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.81 2004-02-03 15:47:58 cg Exp $' |
894 ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.82 2004-02-03 17:13:35 cg Exp $' |
884 ! ! |
895 ! ! |
885 |
896 |
886 ResourcePack initialize! |
897 ResourcePack initialize! |