equal
deleted
inserted
replaced
191 ^ 'Copyright Claus Gittinger 1988-2012\nCopyright eXept Software AG 1998-2012' |
191 ^ 'Copyright Claus Gittinger 1988-2012\nCopyright eXept Software AG 1998-2012' |
192 |
192 |
193 "Modified: / 18-07-2012 / 19:11:56 / cg" |
193 "Modified: / 18-07-2012 / 19:11:56 / cg" |
194 ! |
194 ! |
195 |
195 |
196 productInstallDirBaseName |
|
197 "Returns a default installDir which will appear in <app>.nsi. |
|
198 This is usually not the one you want to keep" |
|
199 |
|
200 ^ (self package asCollectionOfSubstringsSeparatedByAny:':/') last |
|
201 ! |
|
202 |
|
203 productName |
196 productName |
204 "Return a product name which will appear in <lib>.rc" |
197 "Return a product name which will appear in <lib>.rc" |
205 |
198 |
206 ^ 'Smalltalk/X' |
199 ^ 'Smalltalk/X' |
207 ! ! |
200 ! ! |