Permalink
Browse files

Fixed some typos in comments

  • Loading branch information...
1 parent 79268b1 commit 9a24e7d2eacf0d61b04d9f21be18f9690ff05af3 @Palmik Palmik committed Apr 20, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/Snap/Extension/DB/MongoDB/Generics.hs
@@ -254,7 +254,7 @@ saveADT c adt = save c $ toDoc adt
replaceADT :: (Regular a, ToDoc (PF a), DbAccess m) => Selection -> a -> m () -- perhaps replaceWithADT would be better?
replaceADT s adt = replace s $ toDoc adt
-repsertADT :: (Regular a, ToDoc (PF a), DbAccess m) => Selection -> a -> m () -- perhaps replaceWithADT would be better?
+repsertADT :: (Regular a, ToDoc (PF a), DbAccess m) => Selection -> a -> m () -- perhaps repsertWithADT would be better?
repsertADT s adt = repsert s $ toDoc adt
--

0 comments on commit 9a24e7d

Please sign in to comment.