diff options
| -rw-r--r-- | Annex/View.hs | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/Annex/View.hs b/Annex/View.hs index 09fa348d9..6db31ce92 100644 --- a/Annex/View.hs +++ b/Annex/View.hs @@ -207,11 +207,6 @@ matchGlob regex val = isJust $ matchRegex regex val #endif -nonEmptyList :: S.Set a -> Maybe [a] -nonEmptyList s - | S.null s = Nothing - | otherwise = Just $ S.toList s - toViewPath :: MetaValue -> FilePath toViewPath = concatMap escapeslash . fromMetaValue where |