From 753b9079e754cfc65d1fe32c3ffa6adb999cd364 Mon Sep 17 00:00:00 2001 From: Stefan Dresselhaus Date: Tue, 4 Aug 2015 00:12:34 +0200 Subject: [PATCH] minor --- Handler/Wallet.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Handler/Wallet.hs b/Handler/Wallet.hs index ef33871..4af7cd2 100644 --- a/Handler/Wallet.hs +++ b/Handler/Wallet.hs @@ -2,7 +2,7 @@ module Handler.Wallet where import Import -import Eve.Api.Char +import Eve.Api.Char.MarketOrders import Eve.Api.Types as T getWalletR :: Handler Html @@ -11,7 +11,7 @@ getWalletR = loginOrDo $ (\(uid,user) -> do apiKey <- runDB $ getBy $ UniqueApiUser uid acc <- case apiKey of Just (Entity _ (Api _ k v)) -> do - a <- liftIO $ getStandings man (mkComplete k v (userCharId user)) + a <- liftIO $ getMarketOrders man (mkComplete k v (userCharId user)) return (Just a) Nothing -> return Nothing defaultLayout $ [whamlet|