diff options
Diffstat (limited to 'src/Gtk/Shares.icl')
| -rw-r--r-- | src/Gtk/Shares.icl | 1 |
1 files changed, 1 insertions, 0 deletions
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 |