X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=server-src%2Ftaper.pl;h=1ee47b21af5030a3ed4b49c548bbcd634f08756c;hb=cd0b924f27312d57bd42f6c4fae2b795139e2d0b;hp=3b1c0092f9818747fdf29356af297c44c7e84f89;hpb=011a59f5a54864108a16af570a6b287410597cc2;p=debian%2Famanda

diff --git a/server-src/taper.pl b/server-src/taper.pl
index 3b1c009..1ee47b2 100644
--- a/server-src/taper.pl
+++ b/server-src/taper.pl
@@ -24,7 +24,7 @@ use warnings;
 package main;
 
 use Amanda::Util qw( :constants );
-use Amanda::Config qw( :init );
+use Amanda::Config qw( :init :getconf );
 use Amanda::Logfile qw( :logtype_t log_add $amanda_log_trace_log );
 use Amanda::Debug;
 use Amanda::Taper::Controller;
@@ -63,8 +63,10 @@ Amanda::Debug::add_amanda_log_handler($amanda_log_trace_log);
 
 Amanda::Util::finish_setup($RUNNING_AS_DUMPUSER);
 
+my $tlf = Amanda::Config::config_dir_relative(getconf($CNF_TAPELIST));
+my $tl = Amanda::Tapelist->new($tlf);
 # transfer control to the Amanda::Taper::Controller class implemented above
-my $controller = Amanda::Taper::Controller->new();
+my $controller = Amanda::Taper::Controller->new(tapelist => $tl);
 $controller->start();
 Amanda::MainLoop::run();