type alias cleanup

This commit is contained in:
Joey Hess 2011-12-31 04:11:39 -04:00
parent a2ec2d3760
commit 4a02c2ea62
38 changed files with 129 additions and 122 deletions

View file

@ -14,11 +14,11 @@ import Common.Annex
import Types.Backend
import Types.Key
backends :: [Backend Annex]
backends :: [Backend]
backends = [backend]
backend :: Backend Annex
backend = Types.Backend.Backend {
backend :: Backend
backend = Backend {
name = "URL",
getKey = const (return Nothing),
fsckKey = const (return True)