|author||Joey Hess||2019-07-02 11:05:50 -0400|
|committer||Joey Hess||2019-07-02 11:05:50 -0400|
Syrak looked at this branch and said: Cool! I'd suggest that if it's working, that's an accident! You probably want IfStuck e (DelayError err1) (DelayErrorFcf err2) rather than IfStuck e (TypeError err1) (TypeError err2)
Diffstat (limited to 'src/Propellor/Types.hs')
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Propellor/Types.hs b/src/Propellor/Types.hs
index 026babf0..0a3dd122 100644
@@ -225,12 +225,12 @@ type family TightenTargetsAllowed untightened tightened where
&& NonTargets untightened `IsSubset` NonTargets tightened)
(IfStuck (Targets tightened)
('Text "Unable to infer desired Property type in this use of tightenTargets."
':$$: ('Text "Consider adding a type annotation.")
('Text "This use of tightenTargets would widen, not narrow, adding: "
':$$: PrettyPrintMetaTypes (Difference (Targets tightened) (Targets untightened))