ProjectDefinition.st
changeset 21683 85425e233684
parent 21571 102c0d9941b7
child 21753 05abb81eb7a6
--- a/ProjectDefinition.st	Mon Apr 03 12:42:17 2017 +0200
+++ b/ProjectDefinition.st	Tue Apr 04 09:27:02 2017 +0200
@@ -3246,7 +3246,7 @@
      Under win32, this is placed into the dll's file-info.
      This method is usually redefined in a concrete application definition"
 
-    |m nm|
+    |m|
 
     m := self module.
     m = 'stx' ifTrue:[
@@ -3255,28 +3255,10 @@
     m = 'exept' ifTrue:[
         ^ 'eXept AddOns'
     ].
-
-    self isApplicationDefinition ifFalse:[
-        ^ 'LibraryName'
-    ].
-
-    SubclassResponsibilityError handle:[:ex |
-        "/ we get this error, if the concrete class has not yet redefined
-        "/ startupClassName.
-        self breakPoint:#cg.
-        ^ 'ProductName'
-    ] do:[
-        nm := self startupClassName.
-        (nm endsWith:'Startup') ifTrue:[
-            ^ nm copyButLast:'Startup' size.
-        ].
-        (nm endsWith:'Start') ifTrue:[
-            ^ nm copyButLast:'Start' size.
-        ].
-        ^ nm
-    ].
+    ^ nil.
 
     "Modified: / 18-11-2016 / 11:44:03 / cg"
+    "Modified: / 03-04-2017 / 19:09:22 / stefan"
 !
 
 productNameAsValidFilename
@@ -3948,20 +3930,6 @@
     "Created: / 03-09-2012 / 19:50:25 / cg"
 !
 
-generate_vc_dot_def
-
-    ^self replaceMappings: self vc_dot_def_mappings
-            in: self vc_dot_def
-
-"
-  DapasXProject generate_vc_dot_def
-  DapasX_Datenbasis generate_vc_dot_def
-
-"
-
-    "Modified: / 09-08-2006 / 11:31:21 / fm"
-!
-
 generate_vcmake_dot_mak
 
     ^self replaceMappings: self bmake_dot_mak_mappings
@@ -7725,20 +7693,6 @@
     "Modified: / 27-09-2011 / 18:12:33 / cg"
 !
 
-classesForPlatform
-    "list my classes for the current platform.
-     Project must be loaded - otherwise an error is reported here.
-     Use #classNames if you are only interested in the names"
-
-    ^ self classNamesForPlatform collect:[:nm | 
-            Smalltalk at:nm ifAbsent:[self error:'Missing class: ',nm]]
-
-    "
-     stx_libbasic classesForPlatform
-     stx_libbasic classes
-    "
-!
-
 compiled_classNames
     "the opposite of autoloaded class names"