On Sun, Mar 28, 2010 at 7:32 PM, Jeremy Shaw <jeremy@n-heptane.com> wrote:

Oops. Somehow hit the right combination of keys to send before I was done:
 
data EntryId = EntryId { year :: Int
                                     , month :: Int
                                     , day :: Int
                                         , seq :: Int
                                        }

which gets rendered as:

/2010/04/10/1/

- jeremy