"*
 * Encoding: iso8859-1
 *
 * $Header$
 *
 * MIMEType: application/x-smalltalk-source
 *
 * ST/X startup configuration file - for win95, win98 and winNT OS.
 *
 * DONT add site specific things here - use your own h_xxx.rc file instead
 * where xxx stands for your hostname(s)
 *"
!
"/ look in registry for LibDir ...
|k rel curr libDir|

rel := Smalltalk versionString.
k := Win32OperatingSystem registryEntry key:('HKEY_LOCAL_MACHINE\Software\eXept\Smalltalk/X\',rel).
k isNil ifTrue:[
    k := Win32OperatingSystem registryEntry key:'HKEY_LOCAL_MACHINE\Software\eXept\Smalltalk/X'.
    k notNil ifTrue:[
	curr := k valueNamed:'CurrentVersion'.
	curr isString ifTrue:[
	    k close.
	    k := Win32OperatingSystem registryEntry key:('HKEY_LOCAL_MACHINE\Software\eXept\Smalltalk/X\',curr).
	]
    ]
].
k notNil ifTrue:[
    libDir := k valueNamed:'LibDir'.
    (libDir notNil and:[libDir asFilename exists]) ifTrue:[
	(Smalltalk systemPath includes:(libDir asFilename pathName)) ifFalse:[
	    Smalltalk systemPath addFirst:(libDir asFilename pathName).
	    Smalltalk flushPathCaches
	]
    ].
    k close.
].
!
				'C:\Programme\mingw-w64\mingw64\bin'
				'C:\Programme\mingw-w64\mingw\bin'
				'C:\Programs\mingw-w64\mingw64\bin'
				'C:\Programs\mingw-w64\mingw\bin'
				'C:\Program Files\mingw-w64\mingw64\bin'
				'C:\Program Files\mingw-w64\mingw\bin'
				'C:\mingw-w64\mingw64\bin'
				'C:\Programme\mingw-w32\mingw32\bin'
				'C:\Programme\mingw-w32\mingw\bin'
				'C:\Programs\mingw-w32\mingw32\bin'
				'C:\Programs\mingw-w32\mingw\bin'
				'C:\Program Files\mingw-w32\mingw32\bin'
				'C:\Program Files\mingw-w32\mingw\bin'
				'C:\mingw-w32\mingw32\bin'
				'C:\mingw-w32\mingw\bin'