From e620065031c106b4098aef3ae0ffb66bf20eb068 Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Sun, 27 Oct 2019 22:45:37 +0100
Subject: Add many functions for action bars, buttons, list stores, tree views,
 and more

---
 src/Gtk/Shares.icl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/Gtk/Shares.icl')

diff --git a/src/Gtk/Shares.icl b/src/Gtk/Shares.icl
index d02b1b0..4dbfecc 100644
--- a/src/Gtk/Shares.icl
+++ b/src/Gtk/Shares.icl
@@ -51,5 +51,6 @@ withShared default f =
 	updateShared inc temp_share_id >>= \id ->
 	let shared_value = share ("withShared"+++toString id) default in
 	f shared_value
+	// TODO: remove share from map
 where
 	temp_share_id = share "withShared_temp_share_id" 0
-- 
cgit v1.2.3