Changeset 127 for smplayer/vendor/current/setup/smplayer.win32.nsi

Timestamp:

Mar 29, 2012, 3:09:42 PM (13 years ago)

Author:

Silvan Scherrer

Message:

SMPlayer: update to latest svn

File:

• smplayer/vendor/current/setup/smplayer.win32.nsi (modified) (9 diffs)

smplayer/vendor/current/setup/smplayer.win32.nsi

@@ -30 +30 @@
 !endif
 
+  !define SMPLAYER_REG_KEY "Software\SMPlayer"
   !define SMPLAYER_APP_PATHS_KEY "Software\Microsoft\Windows\CurrentVersion\App Paths\smplayer.exe"
-  !define SMPLAYER_REG_KEY "Software\SMPlayer"
+  !define SMPLAYER_DEF_PROGS_KEY "Software\Clients\Media\SMPlayer"
 
   !define SMPLAYER_UNINST_EXE "uninst.exe"
@@ -327 +328 @@
 SectionGroup $(ShortcutGroupTitle)
 
-  ${MementoSection} $(Section_DesktopShortcut) SecDesktopShortcut
+  ${MementoUnselectedSection} $(Section_DesktopShortcut) SecDesktopShortcut
 
     SetOutPath "$INSTDIR"
@@ -583 +584 @@
 
 !macro WriteRegStrSupportedTypes EXT
-  WriteRegStr HKLM  "${SMPLAYER_REG_KEY}\Capabilities\FileAssociations" ${EXT} "MPlayerFileVideo"
+  WriteRegStr HKLM  "${SMPLAYER_DEF_PROGS_KEY}\Capabilities\FileAssociations" ${EXT} "MPlayerFileVideo"
 !macroend
 
@@ -616 +617 @@
   Delete "$INSTDIR\mingwm10.dll"
   Delete "$INSTDIR\zlib1.dll"
-  Delete "$INSTDIR\Q*.dll"
+  Delete "$INSTDIR\Qt*.dll"
   Delete "$INSTDIR\smplayer.exe"
   Delete "$INSTDIR\smtube.exe"
@@ -628 +629 @@
   DeleteRegKey HKLM "${SMPLAYER_REG_KEY}"
   DeleteRegKey HKLM "${SMPLAYER_APP_PATHS_KEY}"
+  DeleteRegKey HKLM "${SMPLAYER_DEF_PROGS_KEY}"
   DeleteRegKey HKLM "${SMPLAYER_UNINST_KEY}"
   DeleteRegKey HKCR "MPlayerFileVideo"
@@ -637 +639 @@
 ;--------------------------------
 ;Shared functions
-
-!macro CheckUserRightsMacro UN
-Function ${UN}CheckUserRights
-
-  ClearErrors
-  UserInfo::GetName
-  ${If} ${Errors}
-    StrCpy $Is_Admin 1
-    Return
-  ${EndIf}
-
-  Pop $UserName
-  UserInfo::GetAccountType
-  Pop $R0
-  ${Switch} $R0
-    ${Case} "Admin"
-    ${Case} "Power"
-      StrCpy $Is_Admin 1
-      ${Break}
-    ${Default}
-      StrCpy $Is_Admin 0
-      ${Break}
-  ${EndSwitch}
-
-FunctionEnd
-!macroend
-!insertmacro CheckUserRightsMacro ""
-!insertmacro CheckUserRightsMacro "un."
 
 !macro RunCheckMacro UN
@@ -700 +674 @@
   Call RunCheck
 
-  ;Check for admin on older OSes
-  Call CheckUserRights
-
-  ${If} $Is_Admin == 0
+  ;Check for admin on < Vista
+  UserInfo::GetAccountType
+  Pop $R0
+  ${If} $R0 != "admin"
     MessageBox MB_OK|MB_ICONSTOP $(Installer_No_Admin)
     Abort
@@ -921 +895 @@
 
   ;Modify the list of extensions added in the MacroAllExtensions macro
-  WriteRegStr HKLM "${SMPLAYER_REG_KEY}\Capabilities" "ApplicationDescription" $(Application_Description)
-  WriteRegStr HKLM "${SMPLAYER_REG_KEY}\Capabilities" "ApplicationName" "SMPlayer"
-  WriteRegStr HKLM "Software\RegisteredApplications" "SMPlayer" "${SMPLAYER_REG_KEY}\Capabilities"
+  WriteRegStr HKLM "${SMPLAYER_DEF_PROGS_KEY}" "" "SMPlayer"
+  WriteRegStr HKLM "${SMPLAYER_DEF_PROGS_KEY}\Capabilities" "ApplicationDescription" $(Application_Description)
+  WriteRegStr HKLM "${SMPLAYER_DEF_PROGS_KEY}\Capabilities" "ApplicationName" "SMPlayer"
+  WriteRegStr HKLM "Software\RegisteredApplications" "SMPlayer" "${SMPLAYER_DEF_PROGS_KEY}\Capabilities"
   !insertmacro MacroAllExtensions WriteRegStrSupportedTypes
 
@@ -968 +943 @@
 Function un.onInit
 
-  ;Check for admin (mimic old Inno Setup behavior)
-  Call un.CheckUserRights
-
-  ${If} $Is_Admin == 0
+  ;Check for admin on < Vista
+  UserInfo::GetAccountType
+  Pop $R0
+  ${If} $R0 != "admin"
     MessageBox MB_OK|MB_ICONSTOP $(Uninstaller_No_Admin)
     Abort