X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Shares%2FmTaskShare.dcl;h=a9c6f396bdb422f7a5ad899cd49ac23373b26e54;hb=acd239b3f29e215ade0b63d5b26b6cf8e8ae0d63;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 ()