diff options
Diffstat (limited to 'LocationLog.hs')
-rw-r--r-- | LocationLog.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LocationLog.hs b/LocationLog.hs index 7497d865b..6d52f4bdd 100644 --- a/LocationLog.hs +++ b/LocationLog.hs @@ -124,7 +124,7 @@ logNow s u = do {- Returns the filename of the log file for a given key. -} logFile :: Git.Repo -> Key -> String logFile repo key = - gitStateDir repo ++ Git.relative repo (keyFile key) ++ ".log" + gitStateDir repo ++ keyFile key ++ ".log" {- Returns a list of repository UUIDs that, according to the log, have - the value of a key. -} |