enhanced UI

Build/Components/4DPop Git.4dbase/Info.plist

@@ -8,13 +8,13 @@
     <key>CFBundleShortVersionString</key>
     <string>20R4</string>
     <key>CFBundleLongVersionString</key>
-    <string>20R4 (170)</string>
+    <string>20R4 (171)</string>
     <key>CFBundleGetInfoString</key>
     <string>20R4</string>
     <key>CFBundleDisplayName</key>
     <string>4DPop Git</string>
     <key>CFBundleVersion</key>
-    <string>171</string>
+    <string>172</string>
     <key>NSHumanReadableCopyright</key>
     <string>©vdl 2020-2023</string>
   </dict>

Build/Components/4DPop Git.4dbase/Resources/en.lproj/gitlab.xlf

@@ -148,6 +148,10 @@ Do you want to download the installer?</target>
           <source>Name (optional)</source>
           <target>Name (optional)</target>
         </trans-unit>
+        <trans-unit id="TnqtftaBecYGx68P3zexgQ" resname="local">
+          <source>Local</source>
+          <target>Local</target>
+        </trans-unit>
       </group>
       <group resname="pattern">
         <trans-unit id="RxY9OfmekBpp22bMfG8PUQ" resname="addPatternToGitignore">
@@ -293,6 +297,16 @@ with 4D "{version}"</target>
     • To: {dest}</target>
         </trans-unit>
       </group>
+      <group resname="Common">
+        <trans-unit id="_QV+y3JxwqeVyIptkO6CTw" resname="today">
+          <source>Today</source>
+          <target>Today</target>
+        </trans-unit>
+        <trans-unit id="cv5Ce93eSnhanKPcvz7pOA" resname="yesterday">
+          <source>Yesterday</source>
+          <target>Yesterday</target>
+        </trans-unit>
+      </group>
     </body>
   </file>
 
@@ -304,4 +318,6 @@ with 4D "{version}"</target>
 
 
 
+
+
 </xliff>

Build/Components/4DPop Git.4dbase/Resources/fr.lproj/gitlab.xlf

@@ -148,6 +148,10 @@ Voulez-vous télécharger l'installateur ?</target>
           <source>Name (optional)</source>
           <target>Nom (facultatif)</target>
         </trans-unit>
+        <trans-unit id="TnqtftaBecYGx68P3zexgQ" resname="local">
+          <source>Local</source>
+          <target>Local</target>
+        </trans-unit>
       </group>
       <group resname="pattern">
         <trans-unit id="RxY9OfmekBpp22bMfG8PUQ" resname="addPatternToGitignore">
@@ -292,6 +296,16 @@ avec 4D "{version}"</target>
     • Ves : {dest}</target>
         </trans-unit>
       </group>
+      <group resname="Common">
+        <trans-unit id="_QV+y3JxwqeVyIptkO6CTw" resname="today">
+          <source>Today</source>
+          <target>Aujourd'hui</target>
+        </trans-unit>
+        <trans-unit id="cv5Ce93eSnhanKPcvz7pOA" resname="yesterday">
+          <source>Yesterday</source>
+          <target>Hier</target>
+        </trans-unit>
+      </group>
     </body>
   </file>
 
@@ -303,4 +317,6 @@ avec 4D "{version}"</target>
 
 
 
+
+
 </xliff>

Build/Components/4DPop Git.4dbase/Resources/onTerminate.json

@@ -0,0 +1,5 @@
+{
+	"commandLine": "/usr/local/Cellar/gh/2.33.0/bin/gh auth login -h github.com -p HTTPS -s repo",
+	"response": "",
+	"responseError": "\n! First copy your one-time code: F757-6638\nOpen this URL to continue in your web browser: https://github.com/login/device\nfailed to authenticate via web browser: The authorization request was denied. (access_denied)\n"
+}

Info.plist

@@ -8,13 +8,13 @@
     <key>CFBundleShortVersionString</key>
     <string>20R4</string>
     <key>CFBundleLongVersionString</key>
-    <string>20R4 (170)</string>
+    <string>20R4 (171)</string>
     <key>CFBundleGetInfoString</key>
     <string>20R4</string>
     <key>CFBundleDisplayName</key>
     <string>4DPop Git</string>
     <key>CFBundleVersion</key>
-    <string>171</string>
+    <string>172</string>
     <key>NSHumanReadableCopyright</key>
     <string>©vdl 2020-2023</string>
   </dict>

Project/Sources/Classes/Git.4dm

@@ -742,7 +742,8 @@ Function branchPushNumber($branch : Text) : Integer
 
 	If (Length:C16($branch)>0)
 
-		This:C1470.execute("rev-list origin/"+$branch+"..HEAD --single-worktree")
+		// This.execute("rev-list origin/"+$branch+"..HEAD --first-parent --single-worktree")
+		This:C1470.execute("rev-list origin/"+$branch+".."+$branch+" --single-worktree")
 
 	Else