Apply hlint's tips to GetFiles.hs
Refactoring
Refactoring more