-- |Modifies the 'profileFiles' field of a profile
onProfileFiles :: Profile b
                  -> (HM.HashMap FilePath FilePath
                      -> HM.HashMap FilePath FilePath)
                  -> Profile b
onProfileFiles (Profile ls hm) f = Profile (f ls) hm
onProfileFiles :: Profile b
                  -> (HM.HashMap FilePath FilePath
                      -> HM.HashMap FilePath FilePath)
                  -> Profile b
onProfileFiles (Profile ls hm) f = Profile (f ls) hm
onProfileFiles (Profile ls hm) f = Profile (f ls) hm