From 864724bdc23083703d0ffd6e1688cd847e0aa64d Mon Sep 17 00:00:00 2001
From: Pascal Terjan <pterjan@gmail.com>
Date: Sat, 6 Feb 2016 19:25:30 +0000
Subject: Better modules split

---
 lib/Iurt/Ulri.pm | 10 +---------
 1 file changed, 1 insertion(+), 9 deletions(-)

(limited to 'lib/Iurt/Ulri.pm')

diff --git a/lib/Iurt/Ulri.pm b/lib/Iurt/Ulri.pm
index 4140678..0f83897 100755
--- a/lib/Iurt/Ulri.pm
+++ b/lib/Iurt/Ulri.pm
@@ -4,6 +4,7 @@ use base qw(Exporter);
 use File::Path qw(make_path);
 use File::Temp qw(mktemp);
 use Iurt::Config qw(get_author_email);
+use Iurt::File qw(check_file_timeout);
 use Iurt::Util qw(plog ssh_setup ssh sput);
 use strict;
 
@@ -122,15 +123,6 @@ sub build_package {
     return $pid;
 }
 
-sub check_file_timeout {
-    my ($file, $time) = @_;
-
-    my $i = 0;
-    while ($i < $time && (!-f $file || -z $file)) { sleep 1; $i++ }
-
-    $i == $time;
-}
-
 sub exclude_machine {
     my ($config, $host) = @_;
     plog('INFO', "Excluding build host $host");
-- 
cgit v1.2.1