diff options
Diffstat (limited to 'TypeInternals.hs')
| -rw-r--r-- | TypeInternals.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/TypeInternals.hs b/TypeInternals.hs index 46c92cb59..4b5cff9d9 100644 --- a/TypeInternals.hs +++ b/TypeInternals.hs @@ -39,7 +39,7 @@ type Annex = StateT AnnexState IO -- annexed filenames are mapped through a backend into keys type KeyName = String type BackendName = String -data Key = Key (BackendName, KeyName) deriving (Eq) +data Key = Key (BackendName, KeyName) deriving (Eq, Ord) -- constructs a key in a backend genKey :: Backend -> KeyName -> Key |