Subversion Repositories gelsvn

Rev

Rev 231 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 231 Rev 232
Line 36... Line 36...
36
  RegWrite($envloc,"GEL_INCLUDE","REG_EXPAND_SZ",$GELpath & "\include")
36
  RegWrite($envloc,"GEL_INCLUDE","REG_EXPAND_SZ",$GELpath & "\include")
37
  RegWrite($envloc,"GEL_LIB","REG_EXPAND_SZ",$GELpath & "\lib")
37
  RegWrite($envloc,"GEL_LIB","REG_EXPAND_SZ",$GELpath & "\lib")
38
  RegWrite($envloc,"GEL_BIN","REG_EXPAND_SZ",$GELpath & "\bin")
38
  RegWrite($envloc,"GEL_BIN","REG_EXPAND_SZ",$GELpath & "\bin")
39
 
39
 
40
  $Path = RegREad($envloc,"Path")
40
  $Path = RegREad($envloc,"Path")
41
  ;RegWrite($envloc,"Path","REG_EXPAND_SZ",$Path & ";" & "%GEL_BIN%")
41
  RegWrite($envloc,"Path","REG_EXPAND_SZ",$Path & ";" & "%GEL_BIN%")
42
 
42
 
43
  DirCreate($GELpath)
43
  DirCreate($GELpath)
44
  FileInstall("externals.exe", $GELpath, 1)
44
  FileInstall("externals.exe", $GELpath, 1)
45
 
45
 
46
  FileChangeDir ( $GELpath )
46
  FileChangeDir ( $GELpath )
Line 55... Line 55...
55
  RegWrite($envloc,"GEL_INCLUDE","REG_EXPAND_SZ",$GELpath & "\include")
55
  RegWrite($envloc,"GEL_INCLUDE","REG_EXPAND_SZ",$GELpath & "\include")
56
  RegWrite($envloc,"GEL_LIB","REG_EXPAND_SZ",$GELpath & "\lib")
56
  RegWrite($envloc,"GEL_LIB","REG_EXPAND_SZ",$GELpath & "\lib")
57
  RegWrite($envloc,"GEL_BIN","REG_EXPAND_SZ",$GELpath & "\bin")
57
  RegWrite($envloc,"GEL_BIN","REG_EXPAND_SZ",$GELpath & "\bin")
58
 
58
 
59
  $Path = RegREad($envloc,"Path")
59
  $Path = RegREad($envloc,"Path")
60
  ;RegWrite($envloc,"Path","REG_EXPAND_SZ",$Path & ";" & "%GEL_BIN%")
60
  RegWrite($envloc,"Path","REG_EXPAND_SZ",$Path & ";" & "%GEL_BIN%")
61
 
61
 
62
  DirCreate($GELpath)
62
  DirCreate($GELpath)
63
  FileInstall("externals.exe", $GELpath, 1)
63
  FileInstall("externals.exe", $GELpath, 1)
64
  FileInstall("gel.exe", $GELpath, 1)
64
  FileInstall("gel.exe", $GELpath, 1)
65
 
65
 
66
  FileChangeDir ( $GELpath )
66
  FileChangeDir ( $GELpath )
67
  RunWait("externals.exe")
67
  RunWait("externals.exe")
68
  RunWait("gel.exe")
68
  RunWait("gel.exe")
69
  ;FileChangeDir ( $GELpath )
-
 
70
  FileDelete("externals.exe")
69
  FileDelete("externals.exe")
71
  FileDelete("gel.exe")
70
  FileDelete("gel.exe")
72
  
71
  
73
EndFunc
72
EndFunc
74
 
73