ignore .DS_Store

d0aaaff4 · Diederik van Arkel · 7c919e8f · d0aaaff4
Commit d0aaaff4 authored Feb 21, 2003 by Diederik van Arkel
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 0 deletions

Pm/PmDirCache.icl Pm/PmDirCache.icl +2 -0

No files found.
--- a/Pm/PmDirCache.icl
+++ b/Pm/PmDirCache.icl
@@ -44,6 +44,8 @@ where
 		= ((errs,cache),files)

 	//removedups :: !.[(String,String,DateTime)] -> .[(String,String,DateTime)]
+	removedups [x=:(".DS_Store",_,_):xs]
+		= removedups xs
 	removedups [x=:(l,p,_):xs]
 		# (wrn,xs)					= dropWarn (\(r,_,_) -> l==r) xs
 		| isEmpty wrn