Add new_no_defaults constructor for test suite

Signed-off-by: Florian Pritz <bluewind@xinu.at>

1 files changed, 16 insertions, 0 deletions

diff --git a/lib/App/BorgRestore.pm b/lib/App/BorgRestore.pm
index 4ca2716..cfc6a90 100644
--- a/lib/App/BorgRestore.pm
+++ b/lib/App/BorgRestore.pm
@@ -67,6 +67,22 @@ sub new {
 
 	$self->{opts} = $opts;
 	$self->{borg} = $deps->{borg} // App::BorgRestore::Borg->new();
+	$self->{db} = $deps->{db} // App::BorgRestore::DB->new();
+
+	return $self;
+}
+
+sub new_no_defaults {
+	my $class = shift;
+	my $opts = shift;
+	my $deps = shift;
+
+	my $self = {};
+	bless $self, $class;
+
+	$self->{opts} = $opts;
+	$self->{borg} = $deps->{borg};
+	$self->{db} = $deps->{db};
 
 	return $self;
 }