Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

TODOs.

  • Loading branch information...
commit 08c85e266a663fafab7a04e207807fcf37a3f16b 1 parent 599ce04
@bjornbm authored
Showing with 2 additions and 1 deletion.
  1. +2 −1  nn.hs
View
3  nn.hs
@@ -17,6 +17,7 @@ import Text.Regex.TDFA
{- TODO:
- global option to specify NN_DIR.
+- Shouldn't change cwd when usind list --exec!
-}
data NN = List { all :: Bool, exec :: Maybe String, terms :: [String] }
@@ -80,7 +81,7 @@ tags (Tags pop) = do
cat (Cat id) = do
files <- getFiles ["name:"++id]
print files
- contents <- mapM readFile files -- TODO doesn't work with unicote filenames.
+ contents <- mapM readFile files -- TODO doesn't work with unicode filenames. Fixed in 7.2.1?
putStr $ unlines $ zipWith (\f c -> header f ++ c) files contents
where
header s = s ++ "\n" ++ take (length s) (repeat '=') ++ "\n"

0 comments on commit 08c85e2

Please sign in to comment.
Something went wrong with that request. Please try again.