git.iko.soy/denis
on master help sign in
Added channel ordering.
71e6f33iko
denis/src/Data/Query.hs+2−1
compare with master
unifiedsplit
@@ -174,7 +174,8 @@ getChannelForUserQ = selectStar $
174getAllChannelsForUserQ :: Query Schema (TuplePG (Only UserId)) (RowPG NamedChannelFull)
174getAllChannelsForUserQ :: Query Schema (TuplePG (Only UserId)) (RowPG NamedChannelFull)
175getAllChannelsForUserQ = selectStar $
175getAllChannelsForUserQ = selectStar $
176 from (table #channels) &
176 from (table #channels) &
177− where_ (#namedChannelFullOwner .== param @1)
177+ where_ (#namedChannelFullOwner .== param @1) &
178+ orderBy [#namedChannelFullId & Desc]
178
179
179createNamedChannelQ :: Manipulation Schema (TuplePG NamedChannelCreation) (RowPG (Only NamedChannelId))
180createNamedChannelQ :: Manipulation Schema (TuplePG NamedChannelCreation) (RowPG (Only NamedChannelId))
180createNamedChannelQ = insertRow #channels
181createNamedChannelQ = insertRow #channels