aboutsummaryrefslogtreecommitdiff
path: root/ShiftOS-TheRevival/MainForms/Terminal.vb
diff options
context:
space:
mode:
authorEverythingWindows <[email protected]>2022-11-07 19:22:19 +0700
committerEverythingWindows <[email protected]>2022-11-07 19:22:19 +0700
commit0a2b03e31283da77d6feaa2fd9d65349a9e82602 (patch)
tree7c41ad58c6c5ee967dec4ac988e85d23b3259455 /ShiftOS-TheRevival/MainForms/Terminal.vb
parent8e9314fd63a107720e0473412b6328d4675fb025 (diff)
downloadshiftos-therevival-old-0a2b03e31283da77d6feaa2fd9d65349a9e82602.tar.gz
shiftos-therevival-old-0a2b03e31283da77d6feaa2fd9d65349a9e82602.tar.bz2
shiftos-therevival-old-0a2b03e31283da77d6feaa2fd9d65349a9e82602.zip
Refined ShiftOS Menu to be more finished and added del command
Diffstat (limited to 'ShiftOS-TheRevival/MainForms/Terminal.vb')
-rw-r--r--ShiftOS-TheRevival/MainForms/Terminal.vb17
1 files changed, 13 insertions, 4 deletions
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