Post Sheep functionality removed

2.10/Source/Main.dfm

@@ -2,7 +2,7 @@ object MainForm: TMainForm
   Left = 408
   Top = 98
   Width = 574
-  Height = 635
+  Height = 675
   Caption = 'Apophysis'
   Color = clBtnFace
   Font.Charset = ANSI_CHARSET
@@ -27,7 +27,7 @@ object MainForm: TMainForm
     Left = 160
     Top = 28
     Width = 4
-    Height = 534
+    Height = 574
   end
   object ToolBar: TToolBar
     Left = 0
@@ -261,7 +261,7 @@ object MainForm: TMainForm
     Left = 0
     Top = 28
     Width = 160
-    Height = 534
+    Height = 574
     Align = alLeft
     Columns = <
       item
@@ -280,7 +280,7 @@ object MainForm: TMainForm
     Left = 164
     Top = 28
     Width = 402
-    Height = 534
+    Height = 574
     Align = alClient
     BevelInner = bvLowered
     BevelOuter = bvNone
@@ -291,7 +291,7 @@ object MainForm: TMainForm
       Left = 1
       Top = 1
       Width = 400
-      Height = 532
+      Height = 572
       Align = alClient
       AutoSize = True
       PopupMenu = DisplayPopup
@@ -303,7 +303,7 @@ object MainForm: TMainForm
   end
   object StatusBar: TStatusBar
     Left = 0
-    Top = 562
+    Top = 602
     Width = 566
     Height = 19
     Panels = <
@@ -2521,11 +2521,12 @@ object MainForm: TMainForm
       object mnuPostSheep: TMenuItem
         Caption = 'Post Sheep...'
         ImageIndex = 45
-        ShortCut = 16456
+        Visible = False
         OnClick = mnuPostSheepClick
       end
       object N21: TMenuItem
         Caption = '-'
+        Visible = False
       end
       object mnuRandomBatch: TMenuItem
         Caption = '&Random Batch'

2.10/Source/Main.pas

@@ -365,7 +365,7 @@ implementation
 uses Editor, Options, Regstry, Gradient, Render,
   FullScreen, FormRender, Mutate, Adjust, Browser, Save, About, CmapData,
   HtmlHlp, ScriptForm, FormFavorites, Size, FormExport, msMultiPartFormData,
-  Sheep, ImageColoring, RndFlame;
+  ImageColoring, RndFlame;
 
 {$R *.DFM}
 
@@ -3822,11 +3822,11 @@ begin
 end;
 
 procedure TMainForm.mnuPostSheepClick(Sender: TObject);
-var
-  URL: string;
-  StringList: TStringList;
-  ResponseStream: TMemoryStream;
-  MultiPartFormDataStream: TmsMultiPartFormDataStream;
+//var
+//  URL: string;
+//  StringList: TStringList;
+//  ResponseStream: TMemoryStream;
+//  MultiPartFormDataStream: TmsMultiPartFormDataStream;
 begin
 //  if MainCp.HasNewVariants then begin
 //    showMessage('The posting of sheep with new variants (exponential, power, cosine and sawtooth) is disabled in this version.');
@@ -3837,7 +3837,7 @@ begin
 //    showMessage('The posting of sheep with are rotated is disabled in this version.');
 //    Exit;
 //  end;
-
+(*
   if SheepDialog.ShowModal = mrOK then
   begin
     DeleteFile('apophysis.log');
@@ -3877,7 +3877,7 @@ begin
       logFile.Active := False;
     end;
   end;
-
+*)
 end;
 
 procedure TMainForm.HTTPRedirect(Sender: TObject; var dest: string;