lyx_mirror/development/Win32/packaging/installer/components/user.nsh
Joost Verburg 3e5373de28 new Windows installer
git-svn-id: svn://svn.lyx.org/lyx/lyx-devel/branches/BRANCH_1_4_X@14420 a592a061-630c-0410-9148-cb99ea01b6c8
2006-07-12 11:03:00 +00:00

86 lines
1.8 KiB
Plaintext

/*
Install type setting (current user/all users)
*/
;--------------------------------
;Macros
!macro GetDirExternal component
ReadRegStr $R0 SHELL_CONTEXT "${APP_REGKEY_SETUP}" "${component} Path"
${if} ${FileExists} "$R0\${BIN_${component}}"
${if} $R0 != ""
StrCpy $Path${component} $R0
${endif}
${endif}
!macroend
;--------------------------------
;Functions
Function InitUser
;Get directories from registry
ReadRegStr $R0 SHELL_CONTEXT "${APP_REGKEY}" ""
${if} $R0 != ""
StrCpy $INSTDIR $R0
${endif}
!insertmacro GetDirExternal LaTeX
!insertmacro GetDirExternal ImageMagick
!insertmacro GetDirExternal Ghostscript
;Set directories in dialogs
!insertmacro InitDialogExternalDir latex ${TRUE}
!insertmacro InitDialogExternalDir imagemagick ${FALSE}
!insertmacro InitDialogExternalDir ghostscript ${FALSE}
;Get LyX language
ReadRegStr $R0 SHELL_CONTEXT "${APP_REGKEY_SETUP}" "LyX Language"
${if} $R0 != ""
!insertmacro MUI_INSTALLOPTIONS_WRITE "langselect.ini" "Field 2" "State" $R0
${endif}
FunctionEnd
;--------------------------------
;Page functions
Function PageUser
;Only show page if installing for all users is possible
${if} $AdminOrPowerUser == ${FALSE}
Call InitUser
Abort
${endif}
!insertmacro MUI_HEADER_TEXT $(TEXT_USER_TITLE) $(TEXT_USER_SUBTITLE)
!insertmacro MUI_INSTALLOPTIONS_DISPLAY "user.ini"
FunctionEnd
Function PageUserValidate
!insertmacro MUI_INSTALLOPTIONS_READ $R0 "user.ini" "Field 2" "State"
${if} $R0 == "1"
SetShellVarContext current
${else}
SetShellVarContext all
StrCpy $AllUsersInstall ${TRUE}
${endif}
Call InitUser
FunctionEnd