From dc9773c0e1ae4730e0b426239b432dff93e226be Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 1 Oct 2003 11:59:57 +0000 Subject: fix symbolic link dereference on "use" --- perl_checker.src/perl_checker.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl_checker.src') diff --git a/perl_checker.src/perl_checker.ml b/perl_checker.src/perl_checker.ml index 114684e..2ff19b3 100644 --- a/perl_checker.src/perl_checker.ml +++ b/perl_checker.src/perl_checker.ml @@ -56,7 +56,7 @@ and parse_package_if_needed per_files (package_name, pos) = (*print_endline_flush ("wondering about " ^ package_name) ;*) try let dir = findfile (Build.fake_packages_dir :: !use_lib) rel_file in - let file = dir ^ "/" ^ rel_file in + let file = Info.file_to_absolute_file (dir ^ "/" ^ rel_file) in Config_file.read_any (Filename.dirname file) (List.length splitted) ; let already_done = try -- cgit v1.2.1