From 0a2b03e31283da77d6feaa2fd9d65349a9e82602 Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Mon, 7 Nov 2022 19:22:19 +0700 Subject: Refined ShiftOS Menu to be more finished and added del command --- ShiftOS-TheRevival/MainForms/Terminal.vb | 17 +++++++++++++---- 1 file changed, 13 insertions(+), 4 deletions(-) (limited to 'ShiftOS-TheRevival/MainForms/Terminal.vb') diff --git a/ShiftOS-TheRevival/MainForms/Terminal.vb b/ShiftOS-TheRevival/MainForms/Terminal.vb index 05988e4..cc130c9 100644 --- a/ShiftOS-TheRevival/MainForms/Terminal.vb +++ b/ShiftOS-TheRevival/MainForms/Terminal.vb @@ -177,9 +177,11 @@ Public Class Terminal AdvancedCommand = False BadCommand = False Case "dir" - TerminalDirectories(CurrentDirectory) - AdvancedCommand = False - BadCommand = False + If Strings.AvailableFeature(16) = "1" Then + TerminalDirectories(CurrentDirectory) + AdvancedCommand = False + BadCommand = False + End If Case "exit su" If Strings.OnceInfo(0) = "No" Then @@ -330,7 +332,7 @@ Public Class Terminal Close() Case "textpad" If Strings.AvailableFeature(17) = "1" Then - TextBox1.Text = TextBox1.Text & "Type any filename after 'textpad'!, ex: textpad text.txt" + TextBox1.Text = TextBox1.Text & Environment.NewLine & "Type any filename after 'textpad'!, ex: textpad text.txt" AdvancedCommand = False BadCommand = False End If @@ -390,6 +392,13 @@ Public Class Terminal GetColor("terminal", command.Substring(6, 1), command.Substring(7, 1)) BadCommand = False End If + If command Like "del *" Then + If Strings.AvailableFeature(16) = 1 Then + DeleteFile(command.Substring(4)) + AdvancedCommand = False + BadCommand = False + End If + End If If command Like "infobar *" Then If Strings.AvailableFeature(4) = "1" Then 'Infobar panel-ish and some sort -- cgit v1.2.3