From 415ee1e40d41886cb7ccf23ee004c7fa67dd7418 Mon Sep 17 00:00:00 2001 From: EverythingWindows Date: Wed, 16 Nov 2022 08:28:22 +0700 Subject: More enhanced code management and DesktopEnvironment experiments --- .../Terminal Applications/Internal/Com_Infobar.vb | 25 ---------------------- 1 file changed, 25 deletions(-) delete mode 100644 ShiftOS-TheRevival/Terminal Applications/Internal/Com_Infobar.vb (limited to 'ShiftOS-TheRevival/Terminal Applications/Internal/Com_Infobar.vb') diff --git a/ShiftOS-TheRevival/Terminal Applications/Internal/Com_Infobar.vb b/ShiftOS-TheRevival/Terminal Applications/Internal/Com_Infobar.vb deleted file mode 100644 index c067125..0000000 --- a/ShiftOS-TheRevival/Terminal Applications/Internal/Com_Infobar.vb +++ /dev/null @@ -1,25 +0,0 @@ -Module Com_Infobar - Public Sub Infobar() - 'Infobar panel-ish and some sort - Dim infobarcommand As String = command.Replace("infobar ", "") - Dim advancedtool As Boolean = True - Select Case infobarcommand - Case "on" - Strings.OnceInfo(2) = "True" - Console.CheckFeature() - Console.BadCommand = False - advancedtool = False - Case "off" - Strings.OnceInfo(2) = "False" - Console.CheckFeature() - Console.BadCommand = False - advancedtool = False - End Select - If advancedtool = True Then - If infobarcommand Like "color *" Then - GetColor("infobar", infobarcommand.Substring(6, 1), infobarcommand.Substring(7, 1)) - Console.BadCommand = False - End If - End If - End Sub -End Module -- cgit v1.2.3