JavaRelease.st
changeset 2152 1cbdfbcc685c
parent 749 e898eaeff091
child 2153 5f9be1e4dea3
--- a/JavaRelease.st	Thu Aug 18 20:42:48 2011 +0200
+++ b/JavaRelease.st	Thu Aug 18 21:06:54 2011 +0200
@@ -403,36 +403,14 @@
 !
 
 javaHomesOnWindows
-    |vsn home heuristics|
 
     self breakPoint:#jv.
-
-    heuristics :=
-       #( 
-         'C:\Program Files (x86)\Java\jdk1.6.0_24\jre' 
+    
+    ^ #( 'C:\Program Files (x86)\Java\jdk1.6.0_24\jre' 
          'C:\Program Files\Java\jdk1.6.0_24\jre'
-        ).
-
-    vsn := (OperatingSystem registryEntry
-        key:'HKEY_LOCAL_MACHINE\SOFTWARE\JavaSoft\Java Development Kit')
-            valueNamed:'CurrentVersion'.
-    vsn notNil ifTrue:[
-        home := (OperatingSystem registryEntry
-            key:'HKEY_LOCAL_MACHINE\SOFTWARE\JavaSoft\Java Development Kit\',vsn)
-                valueNamed:'JavaHome'.
-        home notNil ifTrue:[
-            ^ (Array with:(home,'\jre'))
-            , heuristics
-        ].
-    ].
-    ^ heuristics
-
-    "
-     self basicNew javaHomesOnWindows
-    "
+        )
 
     "Modified: / 07-08-2011 / 20:38:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified (format): / 19-08-2011 / 00:46:40 / cg"
 !
 
 name
@@ -521,10 +499,6 @@
 
 !JavaRelease class methodsFor:'documentation'!
 
-version_CVS
-    ^ '§Header: /cvs/stx/stx/libjava/JavaRelease.st,v 1.2 2011/08/18 22:47:38 cg Exp §'
-!
-
 version_SVN
-    ^ '$Id$'
-! !
\ No newline at end of file
+    ^ '$Id: JavaRelease.st,v 1.1 2011-08-18 19:06:53 vrany Exp $'
+! !