summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/perl_checker.ml
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-01-09 12:21:50 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-01-09 12:21:50 +0000
commit4719b738dfa8da4479086a080f3aa4a9d5a779ea (patch)
tree97905ab74656ff2a776f7d2104d825ab62f80e9a /perl_checker.src/perl_checker.ml
parentdacd47b22374d602709a46ea70930cb43c01a069 (diff)
downloadperl-MDK-Common-4719b738dfa8da4479086a080f3aa4a9d5a779ea.tar
perl-MDK-Common-4719b738dfa8da4479086a080f3aa4a9d5a779ea.tar.gz
perl-MDK-Common-4719b738dfa8da4479086a080f3aa4a9d5a779ea.tar.bz2
perl-MDK-Common-4719b738dfa8da4479086a080f3aa4a9d5a779ea.tar.xz
perl-MDK-Common-4719b738dfa8da4479086a080f3aa4a9d5a779ea.zip
Failure must be always printed
Diffstat (limited to 'perl_checker.src/perl_checker.ml')
-rw-r--r--perl_checker.src/perl_checker.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl_checker.src/perl_checker.ml b/perl_checker.src/perl_checker.ml
index 48e9a2d..a71b062 100644
--- a/perl_checker.src/perl_checker.ml
+++ b/perl_checker.src/perl_checker.ml
@@ -42,7 +42,7 @@ let rec parse_file from_basedir require_name per_files file =
let required_packages = collect (fun package -> package.required_packages) per_file.packages in
required_packages, per_files
with Failure s -> (
- print_endline_flush s ;
+ print_endline_flush_always s ;
exit 1
)
with