diff --git a/GitCompanion.ico b/GitCompanion.ico new file mode 100644 index 0000000..8790789 Binary files /dev/null and b/GitCompanion.ico differ diff --git a/GitCompanion.png b/GitCompanion.png new file mode 100644 index 0000000..861e1ba Binary files /dev/null and b/GitCompanion.png differ diff --git a/main2.pb b/main2.pb index 8098476..d3fc7a7 100644 --- a/main2.pb +++ b/main2.pb @@ -2233,7 +2233,11 @@ Procedure Main() For n = 0 To CountProgramParameters() - 1 param$ = ProgramParameter(n) Select LCase(param$) - Case "--project" : If n + 1 < CountProgramParameters() : main\GitCall\workdir = ProgramParameter(n + 1) : EndIf + Case "--path" + If n + 1 < CountProgramParameters() + main\GitCall\workdir = GetPathPart(ProgramParameter(n + 1)) + + EndIf EndSelect Next n EndIf @@ -2326,11 +2330,18 @@ Procedure Main() Case #GID_BtnInit GitInit() RefreshHelp() + Refresh() Case #GID_BtnRefresh Refresh() RefreshHelp() + Case #GID_EdRemote + If EventType()=#PB_EventType_LostFocus + AddRemoteRepo(SupTrim(GetGadgetText(#GID_EdRemote))) + Refresh() + RefreshHelp() + EndIf Case #GID_BtnClone SetGadgetText(#GID_TxtAction, T("Action.Clone","Clone demandé")) ; TODO: git clone @@ -2385,9 +2396,11 @@ EndProcedure Main() ; IDE Options = PureBasic 6.21 (Windows - x64) -; CursorPosition = 2370 -; FirstLine = 2311 +; CursorPosition = 2340 +; FirstLine = 2308 ; Folding = ---------- ; EnableThread ; EnableXP -; DPIAware \ No newline at end of file +; DPIAware +; UseIcon = GitCompanion.ico +; Executable = GitCompanion.exe \ No newline at end of file