From 5e1abcbc0784836eb96f9272d21f3309aefe4b66 Mon Sep 17 00:00:00 2001 From: nek0 Date: Sun, 11 Oct 2015 22:19:15 +0200 Subject: [PATCH] reverted supplier order --- Handler/Supplier.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Handler/Supplier.hs b/Handler/Supplier.hs index 398d35d..f26aa3f 100755 --- a/Handler/Supplier.hs +++ b/Handler/Supplier.hs @@ -5,7 +5,7 @@ import Data.Maybe getSupplierR :: Handler Html getSupplierR = do - sups <- runDB $ selectList [] [Desc SupplierIdent] + sups <- runDB $ selectList [] [Asc SupplierIdent] defaultLayout $ $(widgetFile "supplier")