diff options
| author | defanor <defanor@uberspace.net> | 2017-11-26 13:36:04 +0300 |
|---|---|---|
| committer | defanor <defanor@uberspace.net> | 2017-11-26 13:36:04 +0300 |
| commit | 3dfe58246ac5b32386dd253b81bdb689133ffc06 (patch) | |
| tree | 4adcc8bc30c24304be117e05970562086456a3a4 /Pancake/Reading.hs | |
| parent | 53d7b8175ff897391fda84eb3dc71af31d364f7e (diff) | |
Add file saving
User commands are adjusted, and the code is slightly refactored in
order to fit this better.
Diffstat (limited to 'Pancake/Reading.hs')
| -rw-r--r-- | Pancake/Reading.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Pancake/Reading.hs b/Pancake/Reading.hs index bd70ad4..d910362 100644 --- a/Pancake/Reading.hs +++ b/Pancake/Reading.hs @@ -68,7 +68,7 @@ retrieve :: String -> URI -- ^ Document URI. -> IO (Maybe (BS.ByteString, Maybe URI, Maybe String)) - -- ^ Document contents. + -- ^ File contents, effective URI, type. retrieve cmd uri = do putErrLn $ "Retrieving " ++ show uri curEnv <- getEnvironment |