Update perl asm scripts include paths for perlasm.

[openssl.git] / crypto / ripemd / asm / rmd-586.pl

diff --git a/crypto/ripemd/asm/rmd-586.pl b/crypto/ripemd/asm/rmd-586.pl
index 4f3c4c9..e8b2bc2 100644 (file)
--- a/crypto/ripemd/asm/rmd-586.pl
+++ b/crypto/ripemd/asm/rmd-586.pl
@@ -5,7 +5,8 @@
 
 $normal=0;
 
 
 $normal=0;
 

-push(@INC,"perlasm","../../perlasm");
+$0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
+push(@INC,"${dir}","${dir}../../perlasm");

 require "x86asm.pl";
 
 &asm_init($ARGV[0],$0);
 require "x86asm.pl";
 
 &asm_init($ARGV[0],$0);