aboutsummaryrefslogtreecommitdiff
path: root/ShiftOS-TheRevival/TerminalApplications/Internal
diff options
context:
space:
mode:
authorEverythingWindows <[email protected]>2022-11-18 16:58:37 +0700
committerEverythingWindows <[email protected]>2022-11-18 16:58:37 +0700
commit996601e9cc2874b7aa6e38772bbb7ac23eed6413 (patch)
tree26f54064983e2a20d487488784697ae5ad8e5e4e /ShiftOS-TheRevival/TerminalApplications/Internal
parent4beaaa1988db67f89ed55d52738fe0d465d6482f (diff)
downloadshiftos-therevival-old-996601e9cc2874b7aa6e38772bbb7ac23eed6413.tar.gz
shiftos-therevival-old-996601e9cc2874b7aa6e38772bbb7ac23eed6413.tar.bz2
shiftos-therevival-old-996601e9cc2874b7aa6e38772bbb7ac23eed6413.zip
Moving majority functions of apps from TerminalExternalApp into its own separate module and fixing bug on ability to set hostname and username to blank
Diffstat (limited to 'ShiftOS-TheRevival/TerminalApplications/Internal')
-rw-r--r--ShiftOS-TheRevival/TerminalApplications/Internal/Com_Hostname.vb9
-rw-r--r--ShiftOS-TheRevival/TerminalApplications/Internal/Com_Username.vb9
2 files changed, 16 insertions, 2 deletions
diff --git a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Hostname.vb b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Hostname.vb
index 8903069..a436643 100644
--- a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Hostname.vb
+++ b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Hostname.vb
@@ -1,6 +1,13 @@
Module Com_Hostname
+ Public NewHostname As String
+
Public Sub Hostname()
- Strings.ComputerInfo(0) = command.Substring(command.LastIndexOf(" ") + 1, command.Length - (command.LastIndexOf(" ") + 1))
+ NewHostname = command.Substring(command.LastIndexOf(" ") + 1, command.Length - (command.LastIndexOf(" ") + 1))
+ If NewHostname = "" Then
+ NewLine("A hostname should not be blank!")
+ Else
+ Strings.ComputerInfo(0) = NewHostname
+ End If
Terminal_AssignPrompt()
End Sub
End Module
diff --git a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Username.vb b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Username.vb
index 0f8b4e7..f3b2423 100644
--- a/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Username.vb
+++ b/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Username.vb
@@ -1,6 +1,13 @@
Module Com_Username
+ Public NewUsername As String
+
Public Sub Username()
- Strings.ComputerInfo(1) = command.Substring(command.LastIndexOf(" ") + 1, command.Length - (command.LastIndexOf(" ") + 1))
+ NewUsername = command.Substring(command.LastIndexOf(" ") + 1, command.Length - (command.LastIndexOf(" ") + 1))
+ If NewUsername = "" Then
+ NewLine("A username should not be blank")
+ Else
+ Strings.ComputerInfo(1) = NewUsername
+ End If
Terminal_AssignPrompt()
End Sub
End Module