From 406dda4afb748c567ef1e050198a93f0a87e3679 Mon Sep 17 00:00:00 2001 From: Joachim Fasting Date: Wed, 19 Sep 2007 23:37:36 +0200 Subject: DirectoryPrompt.hs: add missing type signature. darcs-hash:20070919213736-928c4-4d7b0b44ba6145557e4376f41e8ad6776f3e5538.gz --- DirectoryPrompt.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'DirectoryPrompt.hs') diff --git a/DirectoryPrompt.hs b/DirectoryPrompt.hs index 3be9c29..b010d4f 100644 --- a/DirectoryPrompt.hs +++ b/DirectoryPrompt.hs @@ -37,6 +37,7 @@ getDirCompl :: String -> IO [String] getDirCompl s = (filter notboring . lines) `fmap` runProcessWithInput "/bin/bash" [] ("compgen -A directory " ++ s ++ "\n") +notboring :: String -> Bool notboring ('.':'.':_) = True notboring ('.':_) = False notboring _ = True -- cgit v1.2.3