REF clean up type alias

lib/Xmobar/Plugins/VPN.hs

@@ -52,7 +52,7 @@ instance Exec VPN where
 
 data VEnv c = VEnv
   { vClient :: !c
-  , vState :: !MutableVPNState
+  , vState :: !(MVar VPNState)
   , vDisplay :: !(VIO ())
   , vEnv :: !SimpleApp
   }
@@ -67,8 +67,6 @@ type VIO = RIO (VEnv SysClient)
 
 type VPNState = S.Set ObjectPath
 
-type MutableVPNState = MVar VPNState
-
 initState :: VIO ()
 initState = do
   ot <- getVPNObjectTree