Cédric Bonhomme avatar Cédric Bonhomme committed e84bca3 Draft

Renamed test.hg to troveBoxClient.hs

Comments (0)

Files changed (2)

test.hs

-module HTTPExample
-where
-
-import Network.HTTP -- SimpleHTTP
-
-
-url <- "http://photos.cedricbonhomme.org/photos/list.json?pageSize=1000"
-
--- Fetch a URL via GET
-fetch :: String -> IO String
-fetch url = do
-  response <- simpleHTTP (getRequest url)
-  body <- getResponseBody response
-  return body
-
-main = do
-  fetch url

troveBoxClient.hs

+module HTTPExample
+where
+
+import Network.HTTP -- SimpleHTTP
+
+
+url <- "http://photos.cedricbonhomme.org/photos/list.json?pageSize=1000"
+
+-- Fetch a URL via GET
+fetch :: String -> IO String
+fetch url = do
+  response <- simpleHTTP (getRequest url)
+  body <- getResponseBody response
+  return body
+
+main = do
+  fetch url
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.