diff options
Diffstat (limited to 'ServerBackup.hs')
| -rw-r--r-- | ServerBackup.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ServerBackup.hs b/ServerBackup.hs index 9506ccf..1ef3fdd 100644 --- a/ServerBackup.hs +++ b/ServerBackup.hs @@ -29,7 +29,7 @@ genBackup lsd d = do topdir <- storageTopDir lsd createDirectoryIfMissing True d dest <- backupFile d <$> getPOSIXTime - callCommand ("tar c " ++ topdir ++ " | gpg --encrypt --default-recipient-self > " ++ dest) + callCommand ("tar -C " ++ topdir ++ " c . | gpg --encrypt --default-recipient-self > " ++ dest) -- Keep the past 7 backup files, in case an object file somehow -- gets deleted, this avoids the backup losing it too. -- These backup files can be used to determine eg, what day |