From d86e0ab8de6cd558568301c470bd4c1e163177ba Mon Sep 17 00:00:00 2001
From: LLLL Colonq <llll@colonq>
Date: Mon, 18 Nov 2024 05:34:38 -0500
Subject: Add logout

---
 src/UI.purs | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src/UI.purs')

diff --git a/src/UI.purs b/src/UI.purs
index 17d1ca1..d9a01bc 100644
--- a/src/UI.purs
+++ b/src/UI.purs
@@ -15,3 +15,7 @@ setInterval d f = liftEffect $ _setInterval d f
 foreign import _toJSON :: forall a. a -> String
 toJSON :: forall a. a -> String
 toJSON = _toJSON
+
+foreign import _reload :: Effect Unit
+reload :: forall m. MonadEffect m => m Unit
+reload = liftEffect _reload
-- 
cgit v1.2.3