mirror of
https://git.lyx.org/repos/lyx.git
synced 2025-01-21 23:09:40 +00:00
installer: squash all warnings (except of one that comes later); remove unused code
git-svn-id: svn://svn.lyx.org/lyx/lyx-devel/trunk@39496 a592a061-630c-0410-9148-cb99ea01b6c8
This commit is contained in:
parent
b505d06116
commit
6b36f46b4f
@ -8,27 +8,27 @@ downloaded or installed (depending on the type of installer)
|
|||||||
|
|
||||||
*/
|
*/
|
||||||
|
|
||||||
Var ExternalPage
|
#Var ExternalPage
|
||||||
Var ExternalPage.Info
|
#Var ExternalPage.Info
|
||||||
Var ExternalPage.Setup
|
#Var ExternalPage.Setup
|
||||||
Var ExternalPage.Existing
|
#Var ExternalPage.Existing
|
||||||
Var ExternalPage.Folder
|
#Var ExternalPage.Folder
|
||||||
Var ExternalPage.Folder.Text
|
#Var ExternalPage.Folder.Text
|
||||||
Var ExternalPage.Folder.Return
|
#Var ExternalPage.Folder.Return
|
||||||
Var ExternalPage.FolderBrowse
|
#Var ExternalPage.FolderBrowse
|
||||||
Var ExternalPage.FolderInfo
|
#Var ExternalPage.FolderInfo
|
||||||
Var ExternalPage.NoInstall
|
#Var ExternalPage.NoInstall
|
||||||
|
|
||||||
Var ExternalPage.RadioButton.Click
|
#Var ExternalPage.RadioButton.Click
|
||||||
Var ExternalPage.FolderBrowse.Click
|
#Var ExternalPage.FolderBrowse.Click
|
||||||
|
|
||||||
Var LaTeXState
|
#Var LaTeXState
|
||||||
Var LaTeXSetup.State
|
#Var LaTeXSetup.State
|
||||||
Var LaTeXExisting.State
|
#Var LaTeXExisting.State
|
||||||
Var LaTeXNoInstall.State
|
#Var LaTeXNoInstall.State
|
||||||
|
|
||||||
Var ControlState
|
#Var ControlState
|
||||||
Var ComponentSize
|
#Var ComponentSize
|
||||||
|
|
||||||
!macro EXTERNAL_SHOWDIALOG COMPONENT
|
!macro EXTERNAL_SHOWDIALOG COMPONENT
|
||||||
|
|
||||||
@ -36,8 +36,8 @@ Var ComponentSize
|
|||||||
|
|
||||||
!insertmacro MUI_HEADER_TEXT $(TEXT_EXTERNAL_${COMPONENT}_TITLE) $(TEXT_EXTERNAL_${COMPONENT}_SUBTITLE)
|
!insertmacro MUI_HEADER_TEXT $(TEXT_EXTERNAL_${COMPONENT}_TITLE) $(TEXT_EXTERNAL_${COMPONENT}_SUBTITLE)
|
||||||
|
|
||||||
GetFunctionAddress $ExternalPage.RadioButton.Click ExternalRadioButtonClick
|
# GetFunctionAddress $ExternalPage.RadioButton.Click ExternalRadioButtonClick
|
||||||
GetFunctionAddress $ExternalPage.FolderBrowse.Click ExternalFolderBrowseClick
|
# GetFunctionAddress $ExternalPage.FolderBrowse.Click ExternalFolderBrowseClick
|
||||||
|
|
||||||
nsDialogs::Create /NOUNLOAD 1018
|
nsDialogs::Create /NOUNLOAD 1018
|
||||||
Pop $ExternalPage
|
Pop $ExternalPage
|
||||||
@ -104,7 +104,7 @@ Var ComponentSize
|
|||||||
${NSD_SetState} $ExternalPage.NoInstall $${COMPONENT}NoInstall.State
|
${NSD_SetState} $ExternalPage.NoInstall $${COMPONENT}NoInstall.State
|
||||||
${EndIf}
|
${EndIf}
|
||||||
|
|
||||||
Call ExternalRadioButtonClick
|
#Call ExternalRadioButtonClick
|
||||||
|
|
||||||
nsDialogs::Show
|
nsDialogs::Show
|
||||||
|
|
||||||
@ -163,43 +163,43 @@ Var ComponentSize
|
|||||||
|
|
||||||
!macroend
|
!macroend
|
||||||
|
|
||||||
Function ExternalRadioButtonClick
|
#Function ExternalRadioButtonClick
|
||||||
|
|
||||||
# Enable the folder selection controls depending
|
# Enable the folder selection controls depending
|
||||||
# if the option to use an existing installation is selected
|
# if the option to use an existing installation is selected
|
||||||
|
|
||||||
${NSD_GetState} $ExternalPage.Existing $ControlState
|
# ${NSD_GetState} $ExternalPage.Existing $ControlState
|
||||||
|
|
||||||
${If} $ControlState = ${BST_CHECKED}
|
# ${If} $ControlState = ${BST_CHECKED}
|
||||||
EnableWindow $ExternalPage.Folder 1
|
# EnableWindow $ExternalPage.Folder 1
|
||||||
EnableWindow $ExternalPage.FolderBrowse 1
|
# EnableWindow $ExternalPage.FolderBrowse 1
|
||||||
EnableWindow $ExternalPage.FolderInfo 1
|
# EnableWindow $ExternalPage.FolderInfo 1
|
||||||
${Else}
|
# ${Else}
|
||||||
EnableWindow $ExternalPage.Folder 0
|
# EnableWindow $ExternalPage.Folder 0
|
||||||
EnableWindow $ExternalPage.FolderBrowse 0
|
# EnableWindow $ExternalPage.FolderBrowse 0
|
||||||
EnableWindow $ExternalPage.FolderInfo 0
|
# EnableWindow $ExternalPage.FolderInfo 0
|
||||||
${EndIf}
|
# ${EndIf}
|
||||||
|
|
||||||
FunctionEnd
|
#FunctionEnd
|
||||||
|
|
||||||
Function ExternalFolderBrowseClick
|
#Function ExternalFolderBrowseClick
|
||||||
|
|
||||||
# Browse button clicked
|
# Browse button clicked
|
||||||
|
|
||||||
# Get current folder to set as default
|
# Get current folder to set as default
|
||||||
${NSD_GetText} $ExternalPage.Folder $ExternalPage.Folder.Text
|
# ${NSD_GetText} $ExternalPage.Folder $ExternalPage.Folder.Text
|
||||||
|
|
||||||
# Browse for new folder
|
# Browse for new folder
|
||||||
nsDialogs::SelectFolderDialog /NOUNLOAD "" $ExternalPage.Folder.Text
|
# nsDialogs::SelectFolderDialog /NOUNLOAD "" $ExternalPage.Folder.Text
|
||||||
Pop $ExternalPage.Folder.Return
|
# Pop $ExternalPage.Folder.Return
|
||||||
|
|
||||||
${If} $ExternalPage.Folder.Return != error
|
# ${If} $ExternalPage.Folder.Return != error
|
||||||
StrCpy $ExternalPage.Folder.Text $ExternalPage.Folder.Return
|
# StrCpy $ExternalPage.Folder.Text $ExternalPage.Folder.Return
|
||||||
${EndIf}
|
# ${EndIf}
|
||||||
|
|
||||||
${NSD_SetText} $ExternalPage.Folder $ExternalPage.Folder.Text
|
# ${NSD_SetText} $ExternalPage.Folder $ExternalPage.Folder.Text
|
||||||
|
|
||||||
FunctionEnd
|
#FunctionEnd
|
||||||
|
|
||||||
# Page functions
|
# Page functions
|
||||||
|
|
||||||
|
@ -134,63 +134,6 @@ FunctionEnd
|
|||||||
|
|
||||||
#--------------------------------
|
#--------------------------------
|
||||||
|
|
||||||
Function GetParentA
|
|
||||||
# deletes a subfolder of the APPDATA path for all users
|
|
||||||
# used by the function "un.getUsers"
|
|
||||||
|
|
||||||
Exch $R0
|
|
||||||
Push $R1
|
|
||||||
Push $R2
|
|
||||||
Push $R3
|
|
||||||
StrCpy $R1 0
|
|
||||||
StrLen $R2 $R0
|
|
||||||
loop:
|
|
||||||
IntOp $R1 $R1 + 1
|
|
||||||
IntCmp $R1 $R2 get 0 get
|
|
||||||
StrCpy $R3 $R0 1 -$R1
|
|
||||||
StrCmp $R3 "\" get
|
|
||||||
Goto loop
|
|
||||||
get:
|
|
||||||
StrCpy $R0 $R0 -$R1
|
|
||||||
Pop $R3
|
|
||||||
Pop $R2
|
|
||||||
Pop $R1
|
|
||||||
Exch $R0
|
|
||||||
|
|
||||||
FunctionEnd
|
|
||||||
|
|
||||||
#--------------------------------
|
|
||||||
|
|
||||||
Function GetUsers
|
|
||||||
# reads the subfolders of the "Documents and Settings" folder to get a list of the users
|
|
||||||
|
|
||||||
StrCpy $R3 ""
|
|
||||||
Push "$PROFILE"
|
|
||||||
Call GetParentA
|
|
||||||
Pop $R2
|
|
||||||
StrCpy $R2 "$R2"
|
|
||||||
FindFirst $R0 $R1 "$R2\*"
|
|
||||||
StrCmp $R1 "" findend 0
|
|
||||||
findloop:
|
|
||||||
IfFileExists "$R2\$R1\*.*" 0 notDir
|
|
||||||
StrCmp $R1 "." notDir
|
|
||||||
StrCmp $R1 ".." notDir
|
|
||||||
StrCmp $R1 "All Users" notDir
|
|
||||||
StrCmp $R1 "Default User" notDir
|
|
||||||
StrCmp $R1 "All Users.WINNT" notDir
|
|
||||||
StrCmp $R1 "Default User.WINNT" notDir
|
|
||||||
StrCpy $R3 "$R3|$R1"
|
|
||||||
notDir:
|
|
||||||
FindNext $R0 $R1
|
|
||||||
StrCmp $R1 "" findend 0
|
|
||||||
Goto findloop
|
|
||||||
findend:
|
|
||||||
FindClose $R0
|
|
||||||
|
|
||||||
FunctionEnd
|
|
||||||
|
|
||||||
#--------------------------------
|
|
||||||
|
|
||||||
Function un.GetParentA
|
Function un.GetParentA
|
||||||
# deletes a subfolder of the APPDATA path for all users
|
# deletes a subfolder of the APPDATA path for all users
|
||||||
# used by the function "un.getUsers"
|
# used by the function "un.getUsers"
|
||||||
|
@ -10,8 +10,8 @@ Var PathLaTeX
|
|||||||
Var PathLaTeXLocal
|
Var PathLaTeXLocal
|
||||||
Var PathBibTeXEditor
|
Var PathBibTeXEditor
|
||||||
|
|
||||||
Var SetupLaTeX
|
#Var SetupLaTeX
|
||||||
Var SizeLaTeX
|
#Var SizeLaTeX
|
||||||
|
|
||||||
Var Acrobat
|
Var Acrobat
|
||||||
Var APPDATemp
|
Var APPDATemp
|
||||||
|
Loading…
x
Reference in New Issue
Block a user