diff options
Diffstat (limited to 'ShiftOS-TheRevival/API')
| -rw-r--r-- | ShiftOS-TheRevival/API/ConsoleAPI.vb | 7 | ||||
| -rw-r--r-- | ShiftOS-TheRevival/API/TerminalAPI.vb | 3 |
2 files changed, 7 insertions, 3 deletions
diff --git a/ShiftOS-TheRevival/API/ConsoleAPI.vb b/ShiftOS-TheRevival/API/ConsoleAPI.vb index c7b83d8..adb0d6f 100644 --- a/ShiftOS-TheRevival/API/ConsoleAPI.vb +++ b/ShiftOS-TheRevival/API/ConsoleAPI.vb @@ -9,6 +9,13 @@ Console.WindowState = FormWindowState.Maximized End Sub + Public Sub Console_Interpreters() + If Console.ShouldChange = True Then + Console.ChangeInterpreter = True + Console.ShouldChange = False + End If + End Sub + Public Sub NewLine(str As String) Console.TextBox1.Text = Console.TextBox1.Text & Environment.NewLine & str End Sub diff --git a/ShiftOS-TheRevival/API/TerminalAPI.vb b/ShiftOS-TheRevival/API/TerminalAPI.vb index 66b6af6..c6c8535 100644 --- a/ShiftOS-TheRevival/API/TerminalAPI.vb +++ b/ShiftOS-TheRevival/API/TerminalAPI.vb @@ -167,7 +167,6 @@ Case "bc" If Strings.AvailableFeature(9) = "1" Then Console.ChangeInterpreter = True - 'AppHost("bc", False) BC_Start() AdvancedCommand = False NormalCommand() @@ -206,7 +205,6 @@ End If Case "guess" Console.ChangeInterpreter = True - 'AppHost("guess", False) GTN_Start() AdvancedCommand = False NormalCommand() @@ -382,7 +380,6 @@ Console.ChangeInterpreter = True command = RawCommand.Replace("textpad ", "") TextPad_Start() - 'AppHost("textpad", True) AdvancedCommand = False NormalCommand() End If |