diff --git a/main2.pb b/main2.pb index a059e50..6f4fd62 100644 --- a/main2.pb +++ b/main2.pb @@ -1190,6 +1190,16 @@ Procedure.i GetGitVersion() ProcedureReturn #False EndProcedure +Procedure GitInit() + If Git("init") = 0 + MessageRequester("Git init", "Répertoire initialisé." + #LF$ + SupTrim(main\gitCall\output), #PB_MessageRequester_Info) + ProcedureReturn #True + EndIf + MessageRequester("Git init", "Échec: " + #LF$ + SupTrim(main\gitCall\errors), #PB_MessageRequester_Error) + ProcedureReturn 0 + +EndProcedure + Procedure.i DoCommit() Protected code.i,nb.l=0,i.l Protected args.s = "add" @@ -2028,7 +2038,8 @@ Procedure Main() Case #Panel_Config EndSelect EndIf - + Case #GID_BtnInit + GitInit() Case #GID_BtnBrowseRepo ; FR: Sélection dossier / EN: select folder Protected path$ = PathRequester(T("Dlg.SelectRepo","Sélectionnez le dépôt local..."), GetCurrentDirectory(),WindowID(#WinMain)) @@ -2103,8 +2114,8 @@ EndProcedure Main() ; IDE Options = PureBasic 6.21 (Windows - x64) -; CursorPosition = 776 -; FirstLine = 721 +; CursorPosition = 1197 +; FirstLine = 1190 ; Folding = --------- ; EnableThread ; EnableXP