Rename gitHubURL to gitHUbWebUrl and add PureGitRemote>>#gitHubWebUrl

feenkcom · Nov 6, 2024 · 1f9022e · 1f9022e
1 parent 636616c
commit 1f9022e
Show file tree

Hide file tree

Showing 3 changed files with 7 additions and 2 deletions.
diff --git a/src/GToolkit4Git/PureGitCommit.extension.st b/src/GToolkit4Git/PureGitCommit.extension.st
@@ -47,7 +47,7 @@ PureGitCommit >> gtDetails [
 		{ 'comment' 
 			. self comment firstLineWithEllipsis
 			. self comment }.
-		{ 'URL' . self gitHubURL ifNil: [ '' ] }.
+		{ 'github web url' . self gitHubWebUrl ifNil: [ '' ] }.
 	}
 ]
 

diff --git a/src/GToolkit4Git/PureGitRemote.extension.st b/src/GToolkit4Git/PureGitRemote.extension.st
@@ -37,6 +37,7 @@ PureGitRemote >> gtBranchesFor: composite [
 PureGitRemote >> gtDetails [
 	^ super gtDetails , {
 		{ 'name' . self name }.
-		{ 'url' . self url . self gitUrl }
+		{ 'url' . self url . self gitUrl }.
+		{ 'github web url' . self gitHubWebUrl ifNil: [ '' ] }
 	}
 ]
diff --git a/src/GToolkit4Git/PureGitUrl.extension.st b/src/GToolkit4Git/PureGitUrl.extension.st
@@ -18,6 +18,10 @@ PureGitUrl >> gtDetails [
 		details := details , {
 			{ 'host name' . self hostname }
 		} ].
+	self gitHubWebUrl ifNotNil: [ :gitHubWebUrl |
+		details := details , {
+			{ 'github web url' . gitHubWebUrl }
+		} ].
 	^ details
 ]