diff --git a/clusterd b/clusterd index 6454a40..e1deb59 100755 --- a/clusterd +++ b/clusterd @@ -381,8 +381,8 @@ sub push_file { my $st=Donald::FileInfo->lstat($filename); defined $st or return warn "$filename: $!\n"; - $st->type eq 'F' or return warn "$filename: not a plain file\n"; - $st->size<=40960 or return warn "$filename: to big for broadcast (max 40960 bytes)\n"; + $st->type eq 'F' or die "$filename: not a plain file\n"; + $st->size<=40960 or die "$filename: to big for broadcast (max 40960 bytes)\n"; my $fh=new IO::File $filename,'<' or return warn "$filename: $!\n"; my $i=0;