loadAll
changeset 363 1c36ff13b671
parent 362 85a9d8499e60
child 371 57e7c6388e1e
--- a/loadAll	Sat Aug 29 15:38:13 1998 +0000
+++ b/loadAll	Thu Sep 10 12:58:07 1998 +0000
@@ -1,3 +1,4 @@
+Smalltalk fileIn:'JavaVM.st'.
 Smalltalk fileIn:'Java.st'.
 Smalltalk fileIn:'JavaVM.st'.
 
@@ -73,55 +74,3 @@
 Smalltalk fileIn:'JavaView.st'.
 Smalltalk fileIn:'JavaEmbeddedFrameView.st'.
 
-!
-"/ self halt.
-Java flushClasses. 
-!
-
-|javaHome|
-
-"/
-"/ need jdk1.13 & moz in classPath
-"/
-
-"/ works
-javaHome := '/usr/local/java/jdk113beta'.
-
-"/ experimental
-javaHome := '/usr/local/java/jdk113'.
-
-(javaHome asFilename exists 
-and:[(javaHome asFilename construct:'lib/classes') exists]) ifFalse:[
-    javaHome := '/usr/local/java'.
-    (javaHome asFilename exists 
-    and:[(javaHome asFilename construct:'lib/classes') exists]) ifFalse:[
-	javaHome := '/usr/lib/java'.
-	[javaHome size <= 0 
-	 or:[javaHome asFilename exists
-	     and:[(javaHome asFilename construct:'lib/classes') exists]]] whileFalse:[
-	    javaHome := Dialog request:'what is the home of your java installation\\(Must contain the subdirs ''lib/classes'' and ''src'')' withCRs
-			       initialAnswer:javaHome.
-	].
-    ].
-].
-
-javaHome size > 0 ifTrue:[
-    Java javaHome:javaHome.
-    (javaHome asFilename construct:'lib/classes') exists ifTrue:[
-	Java classPath:(Array with:(javaHome , '/lib/classes')).
-	Java sourceDirectories:(Array with:(javaHome , '/src')).
-    ] ifFalse:[
-	Java classPath:(Array with:(javaHome)).
-	Java sourceDirectories:(Array with:(javaHome)).
-    ].
-
-    Java addToClassPath:'/usr/local/java/moz3_0/lib_unix/classes'.
-
-    "/ JavaClassReader loadClass:'java/util/Stack'. 
-    JavaClassReader loadClass:'sun.tools.javac.Main'. 
-    JavaClassReader loadClass:'sun.applet.AppletViewer'. 
-    JavaClassReader loadClass:'java/rmi/server/RemoteServer'. 
-    JavaClassReader loadClass:'netscape.applet.EmbeddedAppletFrame'. 
-    JavaBrowser open
-]
-!