diff --git a/src/nassella.scm b/src/nassella.scm index 4a3f55e..8a81a18 100644 --- a/src/nassella.scm +++ b/src/nassella.scm @@ -1533,7 +1533,7 @@ chmod -R 777 /opt/keys"))) `((request_id . ,backup-request-id) (version . 0))))) (complete (string=? (alist-ref 'status status-result) "complete"))) - (if (or complete (> (- (time->seconds (current-time)) start-time) 45)) + (if (or complete (> (- (time->seconds (current-time)) start-time) 120)) (with-db/transaction (lambda (db) (update-deployment-progress db deployment-id `((instance-backup . ,(or (and complete 'complete) 'failed))))))