Removed methods that supported Donate action from Notifier

These methods were called by the external object to display the dialogue and by the main form to set the required action.

Author: delphidabbler

Src/IntfNotifier.pas

@@ -71,9 +71,6 @@ interface
     ///  <remarks>Snippet must be user defined.</remarks>
     procedure EditSnippet(const SnippetName: WideString);
 
-    ///  <summary>Displays Donate dialogue box.</summary>
-    procedure Donate;
-
     ///  <summary>Opens Snippets Editor ready to create a new snippet.</summary>
     procedure NewSnippet;
 
@@ -138,10 +135,6 @@ interface
     ///  <param name="Action">TBasicAction [in] Required action.</param>
     procedure SetEditSnippetAction(const Action: TBasicAction);
 
-    ///  <summary>Sets action used to display Donate dialogue box.</summary>
-    ///  <param name="Action">TBasicAction [in] Required action.</param>
-    procedure SetDonateAction(const Action: TBasicAction);
-
     ///  <summary>Sets action used to display a category.</summary>
     ///  <param name="Action">TBasicAction [in] Required action.</param>
     procedure SetDisplayCategoryAction(const Action: TBasicAction);

Src/UNotifier.pas

@@ -54,8 +54,6 @@   TNotifier = class(TInterfacedObject, INotifier, ISetActions)
       ///  <summary>Action that causes a user defined snippet to be
       ///  edited.</summary>
       fEditSnippetAction: TBasicAction;
-      ///  <summary>Action that displays donate dialogue box.</summary>
-      fDonateAction: TBasicAction;
       ///  <summary>Action that causes a category to be displayed.</summary>
       fDisplayCategoryAction: TBasicAction;
       ///  <summary>Action that causes the Snippets Editor to be opened ready to
@@ -129,10 +127,6 @@   TNotifier = class(TInterfacedObject, INotifier, ISetActions)
     ///  </remarks>
     procedure EditSnippet(const SnippetName: WideString);
 
-    ///  <summary>Displays Donate dialogue box.</summary>
-    ///  <remarks>Methods of INotifier.</remarks>
-    procedure Donate;
-
     ///  <summary>Opens Snippets Editor ready to create a new snippet.</summary>
     ///  <remarks>Methods of INotifier.</remarks>
     procedure NewSnippet;
@@ -201,11 +195,6 @@   TNotifier = class(TInterfacedObject, INotifier, ISetActions)
     ///  <remarks>Methods of ISetActions.</remarks>
     procedure SetEditSnippetAction(const Action: TBasicAction);
 
-    ///  <summary>Sets action used to display Donate dialogue box.</summary>
-    ///  <param name="Action">TBasicAction [in] Required action.</param>
-    ///  <remarks>Methods of ISetActions.</remarks>
-    procedure SetDonateAction(const Action: TBasicAction);
-
     ///  <summary>Sets action used to display a category.</summary>
     ///  <param name="Action">TBasicAction [in] Required action.</param>
     ///  <remarks>Methods of ISetActions.</remarks>
@@ -305,12 +294,6 @@ procedure TNotifier.DisplaySnippet(const SnippetName: WideString;
   end;
 end;
 
-procedure TNotifier.Donate;
-begin
-  if Assigned(fDonateAction) then
-    fDonateAction.Execute;
-end;
-
 procedure TNotifier.EditSnippet(const SnippetName: WideString);
 begin
   if Assigned(fEditSnippetAction) then
@@ -369,11 +352,6 @@ procedure TNotifier.SetDisplaySnippetAction(
   (fDisplaySnippetAction as ISetNotifier).SetNotifier(Self);
 end;
 
-procedure TNotifier.SetDonateAction(const Action: TBasicAction);
-begin
-  fDonateAction := Action;
-end;
-
 procedure TNotifier.SetEditSnippetAction(const Action: TBasicAction);
 begin
   Assert(Action is TEditSnippetAction,