annex.version is now set to 4 for direct mode repositories

To avoid old versions of git-annex getting confused.

There is no upgrade required though.
We switch back to 3 when going from direct to indirect.

Command/Direct.hs

@@ -14,6 +14,7 @@ import qualified Git.Command
 import qualified Git.LsFiles
 import Config
 import Annex.Direct
+import Annex.Version
 
 def :: [Command]
 def = [notBareRepo $ 
@@ -53,4 +54,5 @@ cleanup :: CommandCleanup
 cleanup = do
 	showStart "direct" ""
 	setDirect True
+	setVersion directModeVersion
 	return True