* system.terminal renamed fpterm

packages/fcl-fpterm/fpmake.pp

@@ -54,121 +54,121 @@ begin
     p.Dependencies.Add('rtl-console', KVMAny);
     p.Dependencies.Add('ptckvm', PtcKvmOSes);
 
-    T:=P.Targets.AddUnit('system.terminal.base.pas');
+    T:=P.Targets.AddUnit('fpterm.base.pas');
 
-    T:=P.Targets.AddUnit('system.terminal.view.pas');
+    T:=P.Targets.AddUnit('fpterm.view.pas');
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
+        AddUnit('fpterm.base');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.model.pas');
+    T:=P.Targets.AddUnit('fpterm.model.pas');
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
-        AddUnit('system.terminal.view');
+        AddUnit('fpterm.base');
+        AddUnit('fpterm.view');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.inputoutputconnection.pas');
+    T:=P.Targets.AddUnit('fpterm.inputoutputconnection.pas');
 
-    T:=P.Targets.AddUnit('system.terminal.pointingdeviceinput.pas');
+    T:=P.Targets.AddUnit('fpterm.pointingdeviceinput.pas');
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
+        AddUnit('fpterm.base');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.logger.pas');
+    T:=P.Targets.AddUnit('fpterm.logger.pas');
 
-    T:=P.Targets.AddUnit('system.terminal.controller.pas');
+    T:=P.Targets.AddUnit('fpterm.controller.pas');
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
-        AddUnit('system.terminal.model');
-        AddUnit('system.terminal.logger');
+        AddUnit('fpterm.base');
+        AddUnit('fpterm.model');
+        AddUnit('fpterm.logger');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.keyboardinput.pas');
+    T:=P.Targets.AddUnit('fpterm.keyboardinput.pas');
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
+        AddUnit('fpterm.base');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.pas');
+    T:=P.Targets.AddUnit('fpterm.pas');
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
-        AddUnit('system.terminal.view');
-        AddUnit('system.terminal.model');
-        AddUnit('system.terminal.controller');
-        AddUnit('system.terminal.inputoutputconnection');
-        AddUnit('system.terminal.pointingdeviceinput');
-        AddUnit('system.terminal.keyboardinput');
+        AddUnit('fpterm.base');
+        AddUnit('fpterm.view');
+        AddUnit('fpterm.model');
+        AddUnit('fpterm.controller');
+        AddUnit('fpterm.inputoutputconnection');
+        AddUnit('fpterm.pointingdeviceinput');
+        AddUnit('fpterm.keyboardinput');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.keyboardinput.keyboard.pas', KbdOSes);
+    T:=P.Targets.AddUnit('fpterm.keyboardinput.keyboard.pas', KbdOSes);
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
-        AddUnit('system.terminal.keyboardinput');
+        AddUnit('fpterm.base');
+        AddUnit('fpterm.keyboardinput');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.pointingdeviceinput.mouse.pas', MouseOSes);
+    T:=P.Targets.AddUnit('fpterm.pointingdeviceinput.mouse.pas', MouseOSes);
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
-        AddUnit('system.terminal.pointingdeviceinput');
+        AddUnit('fpterm.base');
+        AddUnit('fpterm.pointingdeviceinput');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.view.video.base.pas', VideoOSes);
+    T:=P.Targets.AddUnit('fpterm.view.video.base.pas', VideoOSes);
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.base');
-        AddUnit('system.terminal.view');
+        AddUnit('fpterm.base');
+        AddUnit('fpterm.view');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.view.video.pas', VideoOSes);
+    T:=P.Targets.AddUnit('fpterm.view.video.pas', VideoOSes);
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.view.video.base');
+        AddUnit('fpterm.view.video.base');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.kvm.pas', KVMALL);
+    T:=P.Targets.AddUnit('fpterm.kvm.pas', KVMALL);
     with T.Dependencies do
       begin
-        AddUnit('system.terminal');
-        AddUnit('system.terminal.view');
-        AddUnit('system.terminal.keyboardinput');
-        AddUnit('system.terminal.pointingdeviceinput');
-        AddUnit('system.terminal.view.video');
-        AddUnit('system.terminal.keyboardinput.keyboard');
-        AddUnit('system.terminal.pointingdeviceinput.mouse');
+        AddUnit('fpterm');
+        AddUnit('fpterm.view');
+        AddUnit('fpterm.keyboardinput');
+        AddUnit('fpterm.pointingdeviceinput');
+        AddUnit('fpterm.view.video');
+        AddUnit('fpterm.keyboardinput.keyboard');
+        AddUnit('fpterm.pointingdeviceinput.mouse');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.view.video.ptc.kvm.pas', PtcKvmOSes);
+    T:=P.Targets.AddUnit('fpterm.view.video.ptc.kvm.pas', PtcKvmOSes);
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.view.video.base');
+        AddUnit('fpterm.view.video.base');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.ptc.kvm.pas', PtcKvmOSes);
+    T:=P.Targets.AddUnit('fpterm.ptc.kvm.pas', PtcKvmOSes);
     with T.Dependencies do
       begin
-        AddUnit('system.terminal');
-        AddUnit('system.terminal.view');
-        AddUnit('system.terminal.keyboardinput');
-        AddUnit('system.terminal.pointingdeviceinput');
-        AddUnit('system.terminal.view.video.ptc.kvm');
-        AddUnit('system.terminal.keyboardinput.keyboard');
-        AddUnit('system.terminal.pointingdeviceinput.mouse');
+        AddUnit('fpterm');
+        AddUnit('fpterm.view');
+        AddUnit('fpterm.keyboardinput');
+        AddUnit('fpterm.pointingdeviceinput');
+        AddUnit('fpterm.view.video.ptc.kvm');
+        AddUnit('fpterm.keyboardinput.keyboard');
+        AddUnit('fpterm.pointingdeviceinput.mouse');
       end;
 
-    T:=P.Targets.AddUnit('system.terminal.pseudoterminal.unix.pas', UnixPtyOSes);
+    T:=P.Targets.AddUnit('fpterm.pseudoterminal.unix.pas', UnixPtyOSes);
 
-    T:=P.Targets.AddUnit('system.terminal.inputoutputconnection.unixpty.pas', UnixPtyOSes);
+    T:=P.Targets.AddUnit('fpterm.inputoutputconnection.unixpty.pas', UnixPtyOSes);
     with T.Dependencies do
       begin
-        AddUnit('system.terminal.inputoutputconnection');
-        AddUnit('system.terminal.pseudoterminal.unix');
+        AddUnit('fpterm.inputoutputconnection');
+        AddUnit('fpterm.pseudoterminal.unix');
       end;
   end;
 end;

packages/fcl-fpterm/src/system.terminal.base.pas → packages/fcl-fpterm/src/fpterm.base.pas

@@ -28,7 +28,7 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.Base;
+unit FpTerm.Base;
 
 {$mode objfpc}{$H+}
 {$modeswitch advancedrecords+}

packages/fcl-fpterm/src/system.terminal.controller.pas → packages/fcl-fpterm/src/fpterm.controller.pas

@@ -28,14 +28,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.Controller;
+unit FpTerm.Controller;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.Base, System.Terminal.Model, System.Terminal.Logger;
+  FpTerm.Base, FpTerm.Model, FpTerm.Logger;
 
 type
   TTerminalStateMachineState = (

packages/fcl-fpterm/src/system.terminal.inputoutputconnection.pas → packages/fcl-fpterm/src/fpterm.inputoutputconnection.pas

@@ -32,7 +32,7 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.InputOutputConnection;
+unit FpTerm.InputOutputConnection;
 
 {$mode objfpc}{$H+}
 

packages/fcl-fpterm/src/system.terminal.inputoutputconnection.unixpty.pas → packages/fcl-fpterm/src/fpterm.inputoutputconnection.unixpty.pas

@@ -31,14 +31,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.InputOutputConnection.UnixPty;
+unit FpTerm.InputOutputConnection.UnixPty;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.InputOutputConnection, System.Terminal.Pseudoterminal.Unix;
+  FpTerm.InputOutputConnection, FpTerm.Pseudoterminal.Unix;
 
 type
 

packages/fcl-fpterm/src/system.terminal.keyboardinput.keyboard.pas → packages/fcl-fpterm/src/fpterm.keyboardinput.keyboard.pas

@@ -30,14 +30,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.KeyboardInput.Keyboard;
+unit FpTerm.KeyboardInput.Keyboard;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.Base, System.Terminal.KeyboardInput;
+  FpTerm.Base, FpTerm.KeyboardInput;
 
 type
 
@@ -50,7 +50,7 @@ type
     constructor Create; override;
     destructor Destroy; override;
 
-    procedure GetEvent(out Event: System.Terminal.Base.TKeyEvent); override;
+    procedure GetEvent(out Event: FpTerm.Base.TKeyEvent); override;
   end;
 
 implementation
@@ -63,9 +63,9 @@ uses
 {$ENDIF FPC_DOTTEDUNITS}
 
 {$IFDEF FPC_DOTTEDUNITS}
-function ConvertShiftState(ess: System.Console.Keyboard.TEnhancedShiftState): System.Terminal.Base.TShiftState;
+function ConvertShiftState(ess: System.Console.Keyboard.TEnhancedShiftState): FpTerm.Base.TShiftState;
 {$ELSE FPC_DOTTEDUNITS}
-function ConvertShiftState(ess: Keyboard.TEnhancedShiftState): System.Terminal.Base.TShiftState;
+function ConvertShiftState(ess: Keyboard.TEnhancedShiftState): FpTerm.Base.TShiftState;
 {$ENDIF FPC_DOTTEDUNITS}
 begin
   Result := [];
@@ -104,9 +104,9 @@ begin
 end;
 
 {$IFDEF FPC_DOTTEDUNITS}
-procedure EnhancedKeyEvent2TerminalKeyEvent(const k: System.Console.Keyboard.TEnhancedKeyEvent; var tk: System.Terminal.Base.TKeyEvent);
+procedure EnhancedKeyEvent2TerminalKeyEvent(const k: System.Console.Keyboard.TEnhancedKeyEvent; var tk: FpTerm.Base.TKeyEvent);
 {$ELSE FPC_DOTTEDUNITS}
-procedure EnhancedKeyEvent2TerminalKeyEvent(const k: Keyboard.TEnhancedKeyEvent; var tk: System.Terminal.Base.TKeyEvent);
+procedure EnhancedKeyEvent2TerminalKeyEvent(const k: Keyboard.TEnhancedKeyEvent; var tk: FpTerm.Base.TKeyEvent);
 {$ENDIF FPC_DOTTEDUNITS}
 begin
   tk.VirtualKeyCode := k.VirtualKeyCode;
@@ -136,7 +136,7 @@ begin
   inherited Destroy;
 end;
 
-procedure TTerminalKeyboardInput_Keyboard.GetEvent(out Event: System.Terminal.Base.TKeyEvent);
+procedure TTerminalKeyboardInput_Keyboard.GetEvent(out Event: FpTerm.Base.TKeyEvent);
 var
 {$IFDEF FPC_DOTTEDUNITS}
   k: System.Console.Keyboard.TEnhancedKeyEvent;

packages/fcl-fpterm/src/system.terminal.keyboardinput.pas → packages/fcl-fpterm/src/fpterm.keyboardinput.pas

@@ -30,14 +30,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.KeyboardInput;
+unit FpTerm.KeyboardInput;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.Base;
+  FpTerm.Base;
 
 type
 

packages/fcl-fpterm/src/system.terminal.kvm.pas → packages/fcl-fpterm/src/fpterm.kvm.pas

@@ -30,17 +30,17 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.KVM;
+unit FpTerm.KVM;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal,
-  System.Terminal.View,
-  System.Terminal.KeyboardInput,
-  System.Terminal.PointingDeviceInput;
+  FpTerm,
+  FpTerm.View,
+  FpTerm.KeyboardInput,
+  FpTerm.PointingDeviceInput;
 
 type
 
@@ -64,9 +64,9 @@ uses
 {$ELSE FPC_DOTTEDUNITS}
   SysUtils,
 {$ENDIF FPC_DOTTEDUNITS}
-  System.Terminal.View.Video,
-  System.Terminal.KeyboardInput.Keyboard,
-  System.Terminal.PointingDeviceInput.Mouse;
+  FpTerm.View.Video,
+  FpTerm.KeyboardInput.Keyboard,
+  FpTerm.PointingDeviceInput.Mouse;
 
 { TKVMTerminal }
 

packages/fcl-fpterm/src/system.terminal.logger.pas → packages/fcl-fpterm/src/fpterm.logger.pas

@@ -28,7 +28,7 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.Logger;
+unit FpTerm.Logger;
 
 {$mode objfpc}{$H+}
 

packages/fcl-fpterm/src/system.terminal.model.pas → packages/fcl-fpterm/src/fpterm.model.pas

@@ -28,14 +28,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.Model;
+unit FpTerm.Model;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.Base, System.Terminal.View;
+  FpTerm.Base, FpTerm.View;
 
 type
 

packages/fcl-fpterm/src/system.terminal.pas → packages/fcl-fpterm/src/fpterm.pas

@@ -28,7 +28,7 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal;
+unit FpTerm;
 
 {$mode objfpc}{$H+}
 
@@ -40,13 +40,13 @@ uses
 {$ELSE FPC_DOTTEDUNITS}
   SysUtils,
 {$ENDIF FPC_DOTTEDUNITS}
-  System.Terminal.Base,
-  System.Terminal.View,
-  System.Terminal.Model,
-  System.Terminal.Controller,
-  System.Terminal.InputOutputConnection,
-  System.Terminal.PointingDeviceInput,
-  System.Terminal.KeyboardInput;
+  FpTerm.Base,
+  FpTerm.View,
+  FpTerm.Model,
+  FpTerm.Controller,
+  FpTerm.InputOutputConnection,
+  FpTerm.PointingDeviceInput,
+  FpTerm.KeyboardInput;
 
 type
 

packages/fcl-fpterm/src/system.terminal.pointingdeviceinput.mouse.pas → packages/fcl-fpterm/src/fpterm.pointingdeviceinput.mouse.pas

@@ -30,14 +30,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.PointingDeviceInput.Mouse;
+unit FpTerm.PointingDeviceInput.Mouse;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.Base, System.Terminal.PointingDeviceInput;
+  FpTerm.Base, FpTerm.PointingDeviceInput;
 
 type
 

packages/fcl-fpterm/src/system.terminal.pointingdeviceinput.pas → packages/fcl-fpterm/src/fpterm.pointingdeviceinput.pas

@@ -30,14 +30,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.PointingDeviceInput;
+unit FpTerm.PointingDeviceInput;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.Base;
+  FpTerm.Base;
 
 type
 

packages/fcl-fpterm/src/system.terminal.pseudoterminal.unix.pas → packages/fcl-fpterm/src/fpterm.pseudoterminal.unix.pas

@@ -28,7 +28,7 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.PseudoTerminal.Unix;
+unit FpTerm.PseudoTerminal.Unix;
 
 {$mode objfpc}{$H+}
 

packages/fcl-fpterm/src/system.terminal.ptc.kvm.pas → packages/fcl-fpterm/src/fpterm.ptc.kvm.pas

@@ -30,17 +30,17 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.PTC.KVM;
+unit FpTerm.PTC.KVM;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal,
-  System.Terminal.View,
-  System.Terminal.KeyboardInput,
-  System.Terminal.PointingDeviceInput;
+  FpTerm,
+  FpTerm.View,
+  FpTerm.KeyboardInput,
+  FpTerm.PointingDeviceInput;
 
 type
 
@@ -64,9 +64,9 @@ uses
 {$ELSE FPC_DOTTEDUNITS}
   SysUtils, ptckvm,
 {$ENDIF FPC_DOTTEDUNITS}
-  System.Terminal.View.Video.PTC.KVM,
-  System.Terminal.KeyboardInput.Keyboard,
-  System.Terminal.PointingDeviceInput.Mouse;
+  FpTerm.View.Video.PTC.KVM,
+  FpTerm.KeyboardInput.Keyboard,
+  FpTerm.PointingDeviceInput.Mouse;
 
 { TPTCKVMTerminal }
 

packages/fcl-fpterm/src/system.terminal.view.pas → packages/fcl-fpterm/src/fpterm.view.pas

@@ -30,14 +30,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.View;
+unit FpTerm.View;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.Base;
+  FpTerm.Base;
 
 type
 

packages/fcl-fpterm/src/system.terminal.view.video.base.pas → packages/fcl-fpterm/src/fpterm.view.video.base.pas

@@ -31,14 +31,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.View.Video.Base;
+unit FpTerm.View.Video.Base;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.Base, System.Terminal.View;
+  FpTerm.Base, FpTerm.View;
 
 type
 

packages/fcl-fpterm/src/system.terminal.view.video.pas → packages/fcl-fpterm/src/fpterm.view.video.pas

@@ -30,7 +30,7 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.View.Video;
+unit FpTerm.View.Video;
 
 {$mode objfpc}{$H+}
 
@@ -41,7 +41,7 @@ unit System.Terminal.View.Video;
 interface
 
 uses
-  System.Terminal.View.Video.Base
+  FpTerm.View.Video.Base
 {$ifdef HAS_TERMIO}
   {$IFDEF FPC_DOTTEDUNITS}
     , UnixApi.TermIO

packages/fcl-fpterm/src/system.terminal.view.video.ptc.kvm.pas → packages/fcl-fpterm/src/fpterm.view.video.ptc.kvm.pas

@@ -30,14 +30,14 @@
   Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1335, USA.
 }
 
-unit System.Terminal.View.Video.PTC.KVM;
+unit FpTerm.View.Video.PTC.KVM;
 
 {$mode objfpc}{$H+}
 
 interface
 
 uses
-  System.Terminal.View.Video.Base,
+  FpTerm.View.Video.Base,
 {$IFDEF FPC_DOTTEDUNITS}
   System.Console.Video;
 {$ELSE FPC_DOTTEDUNITS}