1

tests/microos/journal_check.pm

@@ -18,6 +18,7 @@ use microos;
 use version_utils 'is_opensuse';
 use LWP::Simple qw(getstore);
 use Mojo::JSON qw(decode_json);
+use File::Fetch;
 
 sub parse_bug_refs {
     my $bug_file       = shift;
@@ -50,18 +51,8 @@ sub parse_bug_refs {
 }
 
 sub run {
-    my $self    = shift;
-    my $bugfile = 'bugs.json';
-    my $count   = 0;
-    my $result;
-    do {
-        $result = getstore(data_url('journal_check/bug_refs.json'), $bugfile);
-        $count++;
-        bmwqemu::diag("Download attempt: $count\nHTTP code: $result\n");
-        sleep 20;
-    } while ($result != 200 && $count < 5);
-    ($result == 200) or die 'File with bug references has not been downloaded!';
-
+    my $self        = shift;
+    my $bugfile     = sprintf("%s/data/journal_check/bug_refs.json", get_var('CASEDIR'));
     my $bug_pattern = parse_bug_refs($bugfile);
 
     $self->select_serial_terminal;