diff --git a/yampa/CHANGELOG b/yampa/CHANGELOG
index 8956a89..854e87c 100644
--- a/yampa/CHANGELOG
+++ b/yampa/CHANGELOG
@@ -2,6 +2,7 @@
     * Remove postgresql repo before installation in CI script (#284).
     * Simplify definition of FRP.Yampa.Event.joinE (#285).
     * Simplify definition of FRP.Yampa.EventS.isJustEdge (#286).
+    * Simplify definition of FRP.Yampa.Task.isEdge (#287).
 
 2023-12-07 Ivan Perez <ivan.perez@keera.co.uk>
     * Version bump (0.14.6) (#282).
diff --git a/yampa/src/FRP/Yampa/Task.hs b/yampa/src/FRP/Yampa/Task.hs
index bde214e..a6a0358 100644
--- a/yampa/src/FRP/Yampa/Task.hs
+++ b/yampa/src/FRP/Yampa/Task.hs
@@ -94,10 +94,8 @@ taskToSF tk = runTask tk
                                           "Task terminated!"))
                    &&& edgeBy isEdge (Left undefined))
   where
-    isEdge (Left _)  (Left _)  = Nothing
-    isEdge (Left _)  (Right c) = Just c
-    isEdge (Right _) (Right _) = Nothing
-    isEdge (Right _) (Left _)  = Nothing
+    isEdge (Left _) (Right c) = Just c
+    isEdge _        _         = Nothing
 
 -- * Functor, Applicative and Monad instance