plumb MeterUpdate into getKey

No behavior changes, but this shows everywhere that a progress meter
could be displayed when hashing a file to add to the annex.

Many of the places don't make sense to display a progress meter though,
eg when importing the copy of the file probably swamps the hashing of
the file.

Assistant/Threads/Committer.hs

@@ -41,6 +41,7 @@ import qualified Database.Keys
 import qualified Command.Sync
 import qualified Git.Branch
 import Utility.Tuple
+import Utility.Metered
 
 import Data.Time.Clock
 import qualified Data.Set as S
@@ -331,7 +332,7 @@ handleAdds lockdowndir havelsof delayadd cs = returnWhen (null incomplete) $ do
 		doadd = sanitycheck ks $ do
 			(mkey, mcache) <- liftAnnex $ do
 				showStart "add" $ keyFilename ks
-				ingest (Just $ LockedDown lockdownconfig ks) Nothing
+				ingest nullMeterUpdate (Just $ LockedDown lockdownconfig ks) Nothing
 			maybe (failedingest change) (done change mcache $ keyFilename ks) mkey
 	add _ _ = return Nothing