Browse files

Add some comments on the CRUD constructors

  • Loading branch information...
1 parent a15e4e0 commit 4c335a7a520c8b6c1b86c5658a6ce43aedb31695 @mightybyte mightybyte committed Aug 17, 2012
Showing with 14 additions and 1 deletion.
  1. +14 −1 src/Snap/Restful.hs
View
15 src/Snap/Restful.hs
@@ -44,7 +44,20 @@ import Text.Templating.Heist
-------------------------------------------------------------------------------
-data CRUD = RIndex | RCreate | RShow | RNew | REdit | RUpdate | RDestroy
+data CRUD = RIndex
+ -- ^ Gets an item index
+ | RShow
+ -- ^ Gets a single item
+ | RNew
+ -- ^ Get the form for creating a new item
+ | REdit
+ -- ^ Get the form for editing an item
+ | RCreate
+ -- ^ Create a new item
+ | RUpdate
+ -- ^ Update an item
+ | RDestroy
+ -- ^ Delete an item
deriving (Eq,Show,Read,Ord)

0 comments on commit 4c335a7

Please sign in to comment.