From a61b17502d2d3259333115a55adf17f0ad2f228b Mon Sep 17 00:00:00 2001
From: ndwarshuis <ndwar@yavin4.ch>
Date: Tue, 3 Jan 2023 22:32:43 -0500
Subject: [PATCH] REF generalize typeclass

---
 lib/Xmobar/Plugins/VPN.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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