pointedlist 0.3.4 → 0.3.5

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

• Data/List/PointedList.hs +1/−1
• pointedlist.cabal +1/−1

@@ -178,7 +178,7 @@ find x pl = find' ((x ==) . focus) $ positions pl   where find' pred (PointedList a b c) =           if pred b then Just b-                    else List.find pred (a ++ c)+                    else List.find pred (merge a c)         merge []     ys = ys         merge (x:xs) ys = x : merge ys xs 

@@ -1,5 +1,5 @@ Name:          pointedlist-Version:       0.3.4+Version:       0.3.5 Synopsis:      A zipper-like comonad which works as a list, tracking a position. Category:      Data Description: