Moving majority functions of apps from TerminalExternalApp into its own separate module and fixing bug on ability to set hostname and username to blank

1 files changed, 18 insertions, 0 deletions

diff --git a/ShiftOS-TheRevival/TerminalApplications/External/Textpad/App_TextPad.vb b/ShiftOS-TheRevival/TerminalApplications/External/Textpad/App_TextPad.vb
index 80e9599..efe68f4 100644
--- a/ShiftOS-TheRevival/TerminalApplications/External/Textpad/App_TextPad.vb
+++ b/ShiftOS-TheRevival/TerminalApplications/External/Textpad/App_TextPad.vb
@@ -1,6 +1,24 @@
 Imports System.IO
+Imports System.ComponentModel
 
 Module App_TextPad
+    'Public WithEvents TextPad_Shortcut As BackgroundWorker
+
+    'TextPad's RAM
+    Public TextPad_FileName As String
+
+    Public Sub TextPad_Start()
+        Console.DefaultPrompt = Nothing
+        Console.TextBox1.Text = Nothing
+        Console.ToolBarUse = True
+        Terminal_CheckFeature()
+        Console.CurrentInterpreter = "textpad"
+        TextPad_CheckExist(command)
+        Console.ToolBar.Text = "TextPad - " & command & Environment.NewLine & "Ctrl-Q Exit | Ctrl-N New | Ctrl-O Open | Ctrl-S Save | F12 Save As"
+        Console.ReleaseCursor = True
+        TextRebind()
+    End Sub
+
     Public Sub TextPad_CheckExist(TxtFileName As String)
         If File.Exists(Console.CurrentDirectory & "\" & TxtFileName) = True Then
             Console.TextBox1.Text = My.Computer.FileSystem.ReadAllText(Console.CurrentDirectory & "\" & TxtFileName)