1 files changed, 13 insertions, 0 deletions
diff --git a/ShiftOS-TheRevival/MainForms/Applications/Shifter.vb b/ShiftOS-TheRevival/MainForms/Applications/Shifter.vb
new file mode 100644
index 0000000..cea6fe3
--- /dev/null
+++ b/ShiftOS-TheRevival/MainForms/Applications/Shifter.vb
@@ -0,0 +1,13 @@
+Public Class Shifter
+    Public DuWM_PID As Integer                          'DuWM Process ID
+
+    Private Sub Shifter_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+
+    End Sub
+
+    Private Sub DuWM_Tick(sender As Object, e As EventArgs) 
+        If Strings.ProcessID(DuWM_PID) = 0 Then
+            Close()
+        End If
+    End Sub
+End Class
+\ No newline at end of file