In --autostart mode, check for gpg keys that have not been backed up, and offer to back them up.

Only ask once per key.

This commit was sponsored by Thomas Hochstein on Patreon.

1 files changed, 3 insertions, 3 deletions

diff --git a/CmdLine.hs b/CmdLine.hs
index 99414ff..4011f56 100644
--- a/CmdLine.hs
+++ b/CmdLine.hs
@@ -29,7 +29,7 @@ data CmdLine = CmdLine
 	, serverConfig :: ServerConfig
 	}
 
-data Mode = Backup | Restore | UploadQueued | AutoStart | Server | GenBackup FilePath | RestoreBackup FilePath | Chaff HostName | Benchmark | Test
+data Mode = Backup | Restore | UploadQueued | AutoStart | Server | BackupServer FilePath | RestoreServer FilePath | Chaff HostName | Benchmark | Test
 	deriving (Show)
 
 data ServerConfig = ServerConfig
@@ -121,12 +121,12 @@ parseMode =
 		( long "server"
 		<> help "Run as a keysafe server, accepting objects and storing them to ~/.keysafe/objects/local/"
 		)
-	<|> GenBackup <$> strOption
+	<|> BackupServer <$> strOption
 		( long "backup-server"
 		<> metavar "BACKUPDIR"
 		<> help "Run on a server, populates the directory with a gpg encrypted backup of all objects stored in the --store-directory. This is designed to be rsynced offsite (with --delete) to back up the a keysafe server with minimal information leakage."
 		)
-	<|> RestoreBackup <$> strOption
+	<|> RestoreServer <$> strOption
 		( long "restore-server"
 		<> metavar "BACKUPDIR"
 		<> help "Restore all objects present in the gpg-encrypted backups in the specified directory."