X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Shares%2FmTaskShare.dcl;h=a9c6f396bdb422f7a5ad899cd49ac23373b26e54;hb=a2b8b2a0de173f92092bf6cbbed23551e674ca3c;hp=0f476d5148ad830ca9ca8a6a8f484e025a541391;hpb=7fec7868123d56d410e807042cb3e031ebda12b9;p=mTask.git diff --git a/Shares/mTaskShare.dcl b/Shares/mTaskShare.dcl index 0f476d5..a9c6f39 100644 --- a/Shares/mTaskShare.dcl +++ b/Shares/mTaskShare.dcl @@ -9,4 +9,6 @@ import iTasks realShare :: String } -viewShares :: [MTaskShare] -> Task () +instance zero MTaskShare + +manageShares :: [MTaskShare] -> Task ()