142 |
142 |
143 !NewLauncher class methodsFor:'defaults'! |
143 !NewLauncher class methodsFor:'defaults'! |
144 |
144 |
145 defaultInfoLineTemplate |
145 defaultInfoLineTemplate |
146 "available values: |
146 "available values: |
147 PACKAGE - the current packageID |
147 PACKAGE - the current packageID |
148 PACKAGEOREMPTY - the current packageID or empty if its __NoPackage__ |
148 PACKAGEOREMPTY - the current packageID or empty if it's __NoPackage__ |
149 IMAGE - the current snapshot image |
149 IMAGE - the current snapshot image |
150 CVS - the CVS source repository or empty |
150 CVS - the CVS source repository or empty |
151 DB - the Store source repository DB or empty |
151 DB - the Store source repository DB or empty |
152 SVN_WORKING_COPY- the SVN working copy dir or empty |
152 SVN_WORKING_COPY- the SVN working copy dir or empty |
153 NOREPOSITORY - the tring 'No Repository' empty |
153 NOREPOSITORY - the tring 'No Repository' empty |
154 NS - the default namespace, or empty (if Smalltalk) |
154 NS - the default namespace, or empty (if Smalltalk) |
155 PROJECTDIR - the default fileOut directory or empty (if current) |
155 PROJECTDIR - the default fileOut directory or empty (if current) |
156 " |
156 " |
157 |
157 |
158 (SVN::RepositoryManager notNil |
158 (SVN::RepositoryManager notNil |
159 and:[ SVN::RepositoryManager isLoaded |
159 and:[ SVN::RepositoryManager isLoaded |
160 and:[ SVN::RepositoryManager enabled ]]) ifTrue:[ |
160 and:[ SVN::RepositoryManager enabled ]]) ifTrue:[ |
161 ^ '%(PACKAGEOREMPTY)%(IMAGE) %(CVS)%(DB)%(SVN_WORKING_COPY)' |
161 ^ '%(PACKAGEOREMPTY)%(IMAGE) %(CVS)%(DB)%(SVN_WORKING_COPY)' |
162 ]. |
162 ]. |
163 ^ '%(PACKAGEOREMPTY)%(IMAGE)%(CVS)%(DB)%(NOREPOSITORY)%(NS)' |
163 ^ '%(PACKAGEOREMPTY)%(IMAGE)%(CVS)%(DB)%(NOREPOSITORY)%(NS)' |
164 |
164 |
165 "/ ^ '%(PACKAGEOREMPTY)%(IMAGE)%(CVS)%(DB)%(NOREPOSITORY)%(NS)' |
165 "/ ^ '%(PACKAGEOREMPTY)%(IMAGE)%(CVS)%(DB)%(NOREPOSITORY)%(NS)' |
166 "/ ^ '%(PACKAGE)%(IMAGE)%(CVS)%(DB)%(NOREPOSITORY)%(NS)%(PROJECTDIR)' |
166 "/ ^ '%(PACKAGE)%(IMAGE)%(CVS)%(DB)%(NOREPOSITORY)%(NS)%(PROJECTDIR)' |
167 |
167 |
168 "Modified: / 30-09-2008 / 12:45:49 / Jan Vrany <vranyj1@fel.cvut.cz>" |
168 "Modified: / 30-09-2008 / 12:45:49 / Jan Vrany <vranyj1@fel.cvut.cz>" |
|
169 "Modified (comment): / 13-02-2017 / 20:27:15 / cg" |
169 ! |
170 ! |
170 |
171 |
171 windowIcon |
172 windowIcon |
172 ^ Icon stxIcon |
173 ^ Icon stxIcon |
173 |
174 |