--- joko/ToolBox/Windows/VpnDial-installer/ras_functions.nsi 2005/11/22 16:14:19 1.1 +++ joko/ToolBox/Windows/VpnDial-installer/ras_functions.nsi 2005/11/22 17:05:58 1.2 @@ -1,26 +1,26 @@ - - -; from: http://nsis.sourceforge.net/Create_a_GUID,_a_Globally_Unique_Identifier - -;Call CreateGUID -;Pop $0 ;contains GUID -Function CreateGUID - Push $0 - Push $1 - System::Alloc 16 - System::Call 'ole32::CoCreateGuid(i sr1)' - System::Call 'ole32::StringFromGUID2(i r1, w .r0, i ${NSIS_MAX_STRLEN})' - System::Free $1 - Pop $1 - Exch $0 -FunctionEnd - -Function CreateRasGUID - Call CreateGUID - Pop $0 - StrCpy $R0 $0 - ${StrRep} $R0 $R0 "{" "" - ${StrRep} $R0 $R0 "}" "" - ${StrRep} $R0 $R0 "-" "" - Push $R0 -FunctionEnd + + +; from: http://nsis.sourceforge.net/Create_a_GUID,_a_Globally_Unique_Identifier + +;Call CreateGUID +;Pop $0 ;contains GUID +Function CreateGUID + Push $0 + Push $1 + System::Alloc 16 + System::Call 'ole32::CoCreateGuid(i sr1)' + System::Call 'ole32::StringFromGUID2(i r1, w .r0, i ${NSIS_MAX_STRLEN})' + System::Free $1 + Pop $1 + Exch $0 +FunctionEnd + +Function CreateRasGUID + Call CreateGUID + Pop $0 + StrCpy $R0 $0 + ${StrRep} $R0 $R0 "{" "" + ${StrRep} $R0 $R0 "}" "" + ${StrRep} $R0 $R0 "-" "" + Push $R0 +FunctionEnd