* Remove useless Unix specific hack.

git-svn-id: trunk@3777 -

fv/app.pas

@@ -885,11 +885,12 @@ procedure TProgram.SetScreenVideoMode(const Mode: TVideoMode);
 var
   R: TRect;
 begin
-  DoneMouse;
-{  DoneMemory;}
+  hidemouse;
+{  DoneMouse;
+  DoneMemory;}
   ScreenMode:=Mode;
-  InitMouse;
-{  InitMemory;}
+{  InitMouse;
+  InitMemory;}
   InitScreen;
   Video.SetVideoMode(Mode);
   ScreenWidth:=Video.ScreenWidth;

fv/drivers.pas

@@ -828,12 +828,12 @@ VAR
 {                         PRIVATE INTERNAL ROUTINES                         }
 {***************************************************************************}
 
-PROCEDURE ShowMouseCursor;
+PROCEDURE ShowMouseCursor;inline;
 BEGIN
   ShowMouse;
 END;
 
-PROCEDURE HideMouseCursor;
+PROCEDURE HideMouseCursor;inline;
 BEGIN
   HideMouse;
 END;
@@ -870,7 +870,7 @@ end;
 
 {---------------------------------------------------------------------------}
 {  DetectMouse -> Platforms DOS/DPMI/WIN/NT/OS2 - Updated 19May98 LdB       }
-FUNCTION DetectMouse: Byte;
+FUNCTION DetectMouse: Byte;inline;
 begin
   DetectMouse:=Mouse.DetectMouse;
 end;

fv/views.pas

@@ -859,7 +859,7 @@ procedure DrawScreenBuf(force:boolean);
 begin
   if (GetLockScreenCount=0) then
    begin
-     If MouseUsesVideoBuf then
+{     If MouseUsesVideoBuf then
        begin
          LockScreenUpdate;
          HideMouse;
@@ -867,10 +867,10 @@ begin
          UnlockScreenUpdate;
        end
      else
-       HideMouse;
+       HideMouse;}
      UpdateScreen(force);
-     If not MouseUsesVideoBuf then
-       ShowMouse;
+{     If not MouseUsesVideoBuf then
+       ShowMouse;}
    end;
 end;