normalizeAndSplit :: FilePath -> [String]
normalizeAndSplit str = splitDirectories $ lowercase $ dropExtension str
normalizeAndSplit :: FilePath -> [String]
normalizeAndSplit str = splitDirectories $ lowercase $ dropExtension str
normalizeAndSplit str = splitDirectories $ lowercase $ dropExtension str