Fix forgotten seaside version increase in WAWelcome

SeasideSt · May 16, 2020 · b8a6bac · b8a6bac
1 parent d4e1f94
commit b8a6bac
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 5 deletions.
diff --git a/repository/Seaside-Core.package/GRPlatform.extension/instance/seasideVersion.st b/repository/Seaside-Core.package/GRPlatform.extension/instance/seasideVersion.st
@@ -2,5 +2,5 @@
 seasideVersion
 	"Answer the Seaside version"
 
-	^ (GRVersion major: 3 minor: 4 revision: 0)
+	^ (GRVersion major: 3 minor: 4 revision: 1)
 		yourself
diff --git a/repository/Seaside-Welcome.package/WAWelcome.class/instance/renderSideBarDivingInOn..st b/repository/Seaside-Welcome.package/WAWelcome.class/instance/renderSideBarDivingInOn..st
@@ -26,10 +26,18 @@ renderSideBarDivingInOn: html
 				with: 'JQuery UI'.
 			html text: ' integration.' ]. 
 		html listItem: [
-			html text: 'Seaside 3.3 '.
+			html text: 'Seaside ', GRPlatform current seasideVersion greaseString.
 			html anchor
-				url: 'https://github.com/SeasideSt/Seaside/wiki/Seaside330Changelog';
-				with: 'changes' ].	
+				url: 'https://github.com/SeasideSt/Seaside/releases/tag/v',GRPlatform current seasideVersion greaseString;
+				with: ' changes' ].
+		GRPlatform current seasideVersion revision isZero ifFalse:[
+			| majorReleaseVersion |
+			majorReleaseVersion := GRPlatform current seasideVersion copy revision: 0; yourself.
+			html listItem: [
+				html text: 'Seaside ', majorReleaseVersion greaseString.
+				html anchor
+					url: 'https://github.com/SeasideSt/Seaside/releases/tag/v', majorReleaseVersion greaseString;
+					with: ' changes' ] ].
 		html listItem: [
 			html text: 'Seaside '.
 			html anchor

diff --git a/repository/Seaside-Welcome.package/WAWelcome.class/instance/title.st b/repository/Seaside-Welcome.package/WAWelcome.class/instance/title.st
@@ -1,3 +1,3 @@
 accessing
 title
-	^ 'Welcome to Seaside 3.3'
+	^ 'Welcome to Seaside ', GRPlatform current seasideVersion greaseString