Renamed some URL constants

Modified affected code.

Author: delphidabbler

Src/FmMain.pas

@@ -1337,7 +1337,7 @@ procedure TMainForm.InitForm;
 
     // Initialise actions
     // Browse actions have to have URLs set dynamically
-    actGitHubHome.URL := TURL.CodeSnip;
+    actGitHubHome.URL := TURL.CodeSnipRepo;
     actFAQs.URL := TURL.CodeSnipFAQReadMe;
     actBlog.URL := TURL.CodeSnipBlog;
     // Tree control actions need shortcuts adding dynamically, and state stored

Src/USaveUnitMgr.pas

@@ -151,7 +151,7 @@ function TSaveUnitMgr.CreateHeaderComments: IStringList;
     // Result used for units that contain at snippet(s) from main database
     Result.Add(Format(sLicense, [FormatDateTime('YYYY', Now)]));
     Result.Add('');
-    Result.Add(Format(sMainDescription, [TURL.CodeSnip]));
+    Result.Add(Format(sMainDescription, [TURL.CodeSnipRepo]));
     Result.Add('');
     Result.Add(Format(sGenerated, [RFC1123DateStamp]));
     Result.Add(
@@ -161,7 +161,7 @@ function TSaveUnitMgr.CreateHeaderComments: IStringList;
     );
     Result.Add('');
     Result.Add(
-      Format(sAdvert, [TAppInfo.ProgramName, TURL.CodeSnip])
+      Format(sAdvert, [TAppInfo.ProgramName, TURL.CodeSnipRepo])
     );
   end
   else

Src/USnippetDoc.pas

@@ -181,7 +181,7 @@ function TSnippetDoc.Generate(const Snippet: TSnippet): TEncodedData;
     RenderExtra(Snippet.Extra);
   if not Snippet.UserDefined then
     // database info written only if snippet is from main database
-    RenderDBInfo(Format(sMainDatabaseInfo, [TURL.CodeSnip]));
+    RenderDBInfo(Format(sMainDatabaseInfo, [TURL.CodeSnipRepo]));
   Result := FinaliseDoc;
 end;
 

Src/UUrl.pas

@@ -27,31 +27,31 @@   TURL = record
       DDabGitHub = 'https://github.com/delphidabbler';
       ///  <summary>URL of the Code Snippet database's GitHub repository.
       ///  </summary>
-      CodeSnippetsDB = DDabGitHub + '/code-snippets';
+      CodeSnippetsDBRepo = DDabGitHub + '/code-snippets';
       ///  <summary>URL of the SWAG database's GitHub repository.</summary>
-      SWAG = DDabGitHub + '/swag';
+      SWAGRepo = DDabGitHub + '/swag';
       ///  <summary>URL of the CodeSnip FAQ's GitHub repository.</summary>
-      CodeSnipFAQ = DDabGitHub + '/codesnip-faq';
+      CodeSnipFAQRepo = DDabGitHub + '/codesnip-faq';
   public
     const
       ///  <summary>URL of CodeSnip's GitHub repository.</summary>
-      CodeSnip = DDabGitHub + '/codesnip';
+      CodeSnipRepo = DDabGitHub + '/codesnip';
 
       ///  <summary>URL used to view and report CodeSnip bugs on GitHub.
       ///  </summary>
-      CodeSnipBugTracker = CodeSnip + '/issues';
+      CodeSnipBugTracker = CodeSnipRepo + '/issues';
 
       ///  <summary>URL of CodeSnip's FAQ web page.</summary>
       ///  <remarks>This is the CodeSnip FAQ project on GitHub.</remarks>
-      CodeSnipFAQReadMe = CodeSnipFAQ + '/blob/master/README.md';
+      CodeSnipFAQReadMe = CodeSnipFAQRepo + '/blob/master/README.md';
 
       ///  <summary>URL of the GitHub page where DelphiDabbler Code Snippets
       ///  database releases are hosted.</summary>
-      CodeSnippetsDBReleases = CodeSnippetsDB + '/releases';
+      CodeSnippetsDBReleases = CodeSnippetsDBRepo + '/releases';
 
       ///  <summary>URL of the GitHub page where SWAG database releases are
       ///  hosted.</summary>
-      SWAGReleases = SWAG + '/releases';
+      SWAGReleases = SWAGRepo + '/releases';
 
       ///  <summary>URL used to make donations towards the CodeSnip project.
       ///  </summary>