diff --git a/lib/Xmobar/Plugins/VPN.hs b/lib/Xmobar/Plugins/VPN.hs index a4283db..037420c 100644 --- a/lib/Xmobar/Plugins/VPN.hs +++ b/lib/Xmobar/Plugins/VPN.hs @@ -57,7 +57,7 @@ data VEnv c = VEnv , vEnv :: !SimpleApp } -instance HasLogFunc (VEnv SysClient) where +instance SafeClient c => HasLogFunc (VEnv c) where logFuncL = lens vEnv (\x y -> x {vEnv = y}) . logFuncL instance HasClient VEnv where