; Installer script for Ensemble Verbes patch
; $VER: Install_Patch 1.0 (28.3.95)

(set newdest
	(askdir
		(prompt "Select the directory where \"Ensemble Verbes\" was installed")
		(default @default-dest)
		(help "You must tell the installer where \"Ensemble Verbes\" is located.")
		(newpath)
	)
)

(set oldfile (tackon newdest "Verbes"))

(if
	(exists oldfile)
	(
		(working "Patching Ensemble Verbes to V1.2")
		; Create new file in T:
		(run (cat "spatch -oT:Verbes -pVerbes.pch " oldfile))
		; Copy new file over old file
		(copyfiles (source "T:Verbes") (dest oldfile))
		; Remove temporary file
		(delete "t:Verbes")
	)
)
