Don't pass the finder around any more.  Instead, its state lives in
the I/O monad.

module Finder (
    newFinder, 		-- :: PackageConfigInfo -> IO (),
    findModule,		-- :: ModuleName -> IO (Maybe (Module, ModuleLocation))
    ModuleLocation(..),
    mkHomeModuleLocn,
  ) where