Sie können es nicht direkt anschließen, da die Typen nicht übereinstimmen:
ghci>: t isFullscreen -?> doFullFloat isFullscreen -?> doFullFloat :: MaybeManageHook ghci>: t composeAll composeAll :: [ManageHook] -> ManageHook
Beachten Sie jedoch
ghci>: t composeOne composeOne :: [MaybeManageHook] -> ManageHook
Dies erfordert eine Liste von verwalteten Hooks, die möglicherweise ausgeführt werden oder nicht, und kombiniert sie in einer Aktion.
MaybeManageHook
passt auch gut zu
* Main>: t vielleichtToDefinite maybeToDefinite :: MaybeManageHook -> ManageHook
Entweder hinzufügen
, [ maybeToDefinite (isFullscreen -?> doFullFloat) ]
oder
, [ composeOne [ isFullscreen -?> doFullFloat ] ]
zur Definition von myManageHook
.