diff options
Diffstat (limited to 'Storage/Network.hs')
| -rw-r--r-- | Storage/Network.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/Storage/Network.hs b/Storage/Network.hs index ec00cf8..96aa1c0 100644 --- a/Storage/Network.hs +++ b/Storage/Network.hs @@ -25,7 +25,11 @@ serverUrl :: Server -> BaseUrl serverUrl srv = BaseUrl Http (serverName srv) (serverPort srv) "" networkServers :: IO [Server] -networkServers = return [] -- none yet +networkServers = return + [ Server "localhost" 8080 + , Server "localhost" 8080 + , Server "localhost" 8080 + ] networkStorage :: Server -> Storage networkStorage server = Storage |