[libinline-java-perl] 167/398: canonpath one path

[Jonas Smedegaard]

This is an automated email from the git hooks/post-receive script.

js pushed a commit to tag 0.55
in repository libinline-java-perl.

commit 9b28b4b4579b6003e5e9434c60e9c769eadd8f30
Author: patrick_leb <>
Date:   Mon Feb 4 02:45:55 2002 +0000

    canonpath one path
---
 Java/Makefile.PL | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Java/Makefile.PL b/Java/Makefile.PL
index 49e0162..42bc03b 100644
--- a/Java/Makefile.PL
+++ b/Java/Makefile.PL
@@ -139,7 +139,8 @@ sub search {
 	my $ext = Inline::Java::Portable::portable('SO_EXT') ;
 	if ($File::Find::dir =~ /jre/){
 		if ($file =~ /\.$ext$/){
-			$so_dirs{$File::Find::dir} = 1 ;
+			my $dir = File::Spec->canonpath($File::Find::dir) ;
+			$so_dirs{$dir} = 1 ;
 		}
 	}
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libinline-java-perl.git