--- a/NewLauncher.st	Thu Apr 23 11:46:34 1998 +0200
+++ b/NewLauncher.st	Thu Apr 23 11:46:42 1998 +0200
@@ -2310,18 +2310,22 @@
     self withWaitCursorDo:[
         |lang doc|
 
-        ((lang := Smalltalk language) = 'de'
-        or:[lang = 'german']) ifTrue:[
-            doc := 'german/LICENCE_STX.html'
+        Smalltalk releaseIdentification = 'ST/X_free_demo_vsn' ifTrue:[
+            doc := 'english/LICENCE_DEMO_STX.html'
         ] ifFalse:[
-            doc := 'english/LICENCE_STX.html'
+            ((lang := Smalltalk language) = 'de'
+            or:[lang = 'german']) ifTrue:[
+                doc := 'german/LICENCE_STX.html'
+            ] ifFalse:[
+                doc := 'english/LICENCE_STX.html'
+            ].
         ].
         doc := resources at:'LICENCEFILE' default:doc.
         self showDocumentation:('../' , doc)
     ]
 
     "Created: / 5.2.1998 / 21:43:19 / cg"
-    "Modified: / 25.2.1998 / 21:23:41 / cg"
+    "Modified: / 23.4.1998 / 11:45:53 / cg"
 ! !
 
 !NewLauncher methodsFor:'user actions - classes'!
@@ -5137,5 +5141,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.55 1998-04-22 16:06:00 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.56 1998-04-23 09:46:42 cg Exp $'
 ! !