reverted supplier order
This commit is contained in:
parent
cfc8b3054d
commit
5e1abcbc07
1 changed files with 1 additions and 1 deletions
|
@ -5,7 +5,7 @@ import Data.Maybe
|
||||||
|
|
||||||
getSupplierR :: Handler Html
|
getSupplierR :: Handler Html
|
||||||
getSupplierR = do
|
getSupplierR = do
|
||||||
sups <- runDB $ selectList [] [Desc SupplierIdent]
|
sups <- runDB $ selectList [] [Asc SupplierIdent]
|
||||||
defaultLayout $
|
defaultLayout $
|
||||||
$(widgetFile "supplier")
|
$(widgetFile "supplier")
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue