Mercurial > gub

comparison nsis/schikkers-list.nsi @ 6504:986413a75226

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
nsis/schikkers-list.nsi: re-enable auto-compile for guile.
author Jan Nieuwenhuizen <janneke@gnu.org>
date Fri, 18 Mar 2011 23:21:09 +0100
parents d8f9478db85e
children d388f9cf3a50
comparison
equal deleted inserted replaced
6503:ba506e08a7ce 6504:986413a75226
335 ;;scm_open: 335 ;;scm_open:
336 ReadRegStr $R0 HKCR "Guile\shell\open\command" "" 336 ReadRegStr $R0 HKCR "Guile\shell\open\command" ""
337 ;;StrCmp $R0 "" 0 scm_auto_file 337 ;;StrCmp $R0 "" 0 scm_auto_file
338 WriteRegStr HKCR "Guile\shell" "" "open" 338 WriteRegStr HKCR "Guile\shell" "" "open"
339 # %1 is the GUILE command, so must be quoted bo the space 339 # %1 is the GUILE command, so must be quoted bo the space
340 WriteRegExpandStr HKCR "Guile\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" --no-auto-compile "%1" %2 %3 %4 %5 %6 %7 %8 %9' 340 WriteRegExpandStr HKCR "Guile\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" "%1" %2 %3 %4 %5 %6 %7 %8 %9'
341 341
342 ;;scm_auto_file: 342 ;;scm_auto_file:
343 ReadRegStr $R0 HKCR "scm_auto_file\shell\open\command" "" 343 ReadRegStr $R0 HKCR "scm_auto_file\shell\open\command" ""
344 ;;StrCmp $R0 "" 0 scm_end 344 ;;StrCmp $R0 "" 0 scm_end
345 WriteRegStr HKCR "scm_auto_file\shell" "" "open" 345 WriteRegStr HKCR "scm_auto_file\shell" "" "open"
346 # %1 is the GUILE command, so must be quoted bo the space 346 # %1 is the GUILE command, so must be quoted bo the space
347 WriteRegExpandStr HKCR "scm_auto_file\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" --no-auto-compile "%1" %2 %3 %4 %5 %6 %7 %8 %9' 347 WriteRegExpandStr HKCR "scm_auto_file\shell\open\command" "" '"$INSTDIR\usr\bin\guile-windows.exe" "%1" %2 %3 %4 %5 %6 %7 %8 %9'
348 ;;scm_end: 348 ;;scm_end:
349 FunctionEnd 349 FunctionEnd
350 350
351 !include "FontName.nsh" 351 !include "FontName.nsh"
352 !include "FontReg.nsh" 352 !include "FontReg.nsh"