Mercurial > gub

changeset 6472:51635cbba4b0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
schikkers-list.nsi: more desktop invocation tests.
author Jan Nieuwenhuizen <janneke@gnu.org>
date Wed, 02 Feb 2011 18:24:26 +0100
parents 834c939b7f86
children 3f3bf4ecad6e
files nsis/schikkers-list.nsi
diffstat 1 files changed, 10 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/nsis/schikkers-list.nsi	Wed Feb 02 18:23:54 2011 +0100
+++ b/nsis/schikkers-list.nsi	Wed Feb 02 18:24:26 2011 +0100
@@ -272,6 +272,9 @@
 	CreateShortCut "$SMPROGRAMS\Schikkers-List\Schikkers-List.lnk" \
 		"$INSTDIR\usr\bin\schikkers-list.scm" ""\
  		"$INSTDIR\usr\share\guile\site\ikli\images\ikli.ico" 0 SW_SHOWNORMAL
+	CreateShortCut "$SMPROGRAMS\Schikkers-List\Schikkers-List-NOQUOTE.lnk" \
+		$INSTDIR\usr\bin\schikkers-list.scm ""\
+ 		"$INSTDIR\usr\share\guile\site\ikli\images\ikli.ico" 0 SW_SHOWNORMAL
 	CreateShortCut "$SMPROGRAMS\Schikkers-List\Schikkers-List Website.lnk" \
 		"http://schikkers-list.org/" "" \
 		"firefox.exe" 0
@@ -290,6 +293,9 @@
 	CreateShortCut "$DESKTOP\Schikkers-List.lnk" \
 		"$INSTDIR\usr\bin\schikkers-list.scm" ""\
  		"$INSTDIR\usr\share\guile\site\ikli\images\ikli.ico" 0 SW_SHOWNORMAL
+	CreateShortCut "$DESKTOP\Schikkers-List-NOQUOTE.lnk" \
+		$INSTDIR\usr\bin\schikkers-list.scm ""\
+ 		"$INSTDIR\usr\share\guile\site\ikli\images\ikli.ico" 0 SW_SHOWNORMAL
 FunctionEnd
 
 Function registry_python
@@ -335,13 +341,15 @@
 	;;StrCmp $R0 "" 0 scm_auto_file
 	WriteRegStr HKCR "Guile\shell" "" "open"
 	# %1 is the GUILE command, so must be quoted bo the space
-	WriteRegExpandStr HKCR "Guile\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" "%1" %2 %3 %4 %5 %6 %7 %8 %9'
+	;;	WriteRegExpandStr HKCR "Guile\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" "%1" %2 %3 %4 %5 %6 %7 %8 %9'
+	WriteRegExpandStr HKCR "Guile\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" %1 %2 %3 %4 %5 %6 %7 %8 %9'
 
 ;;scm_auto_file:
 	ReadRegStr $R0 HKCR "scm_auto_file\shell\open\command" ""
 	;;StrCmp $R0 "" 0 scm_end
 	WriteRegStr HKCR "scm_auto_file\shell" "" "open"
 	# %1 is the GUILE command, so must be quoted bo the space
-	WriteRegExpandStr HKCR "scm_auto_file\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" "%1" %2 %3 %4 %5 %6 %7 %8 %9'
+	;;	WriteRegExpandStr HKCR "scm_auto_file\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" "%1" %2 %3 %4 %5 %6 %7 %8 %9'
+	WriteRegExpandStr HKCR "scm_auto_file\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" %1 %2 %3 %4 %5 %6 %7 %8 %9'
 ;;scm_end:	
 FunctionEnd