Advertisement
Guest User

Untitled

a guest
Dec 27th, 2015
71
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.59 KB | None | 0 0
  1. c:\src\cperl>git diff master -- installperl
  2. diff --git a/installperl b/installperl
  3. index 6f41512..d19218c 100755
  4. --- a/installperl
  5. +++ b/installperl
  6. @@ -238,7 +238,7 @@ if ($Is_VMS) { # Hang in there until File::Spec hits the bi
  7. g time
  8.  
  9. if (!$Is_NetWare) {
  10. if (!$Is_VMS) {
  11. --x 'perl' . $exe_ext || die "perl isn't executable!\n";
  12. +-x 'cperl' . $exe_ext || die "perl isn't executable!\n";
  13. }
  14. else {
  15. -x $ndbg . 'perl' . $exe_ext || die "${ndbg}perl$exe_ext isn't executable!\n"
  16. ;
  17. @@ -261,7 +261,7 @@ if (($Is_W32 and ! $Is_NetWare) or $Is_Cygwin) {
  18. if ($Is_Cygwin) {
  19. $perldll = $libperl;
  20. } else {
  21. - $perldll = 'perl5'.$Config{patchlevel}.'.'.$so;
  22. + $perldll = 'cperl5'.$Config{patchlevel}.'.'.$so;
  23. }
  24.  
  25. if ($dlsrc ne "dl_none.xs") {
  26. @@ -296,7 +296,7 @@ if ($Is_VMS) {
  27. elsif ($^O ne 'dos') {
  28. if (!$Is_NetWare) {
  29. safe_unlink("$installbin/$perl_verbase$ver$exe_ext");
  30. - copy("perl$exe_ext", "$installbin/$perl_verbase$ver$exe_ext");
  31. + copy("cperl$exe_ext", "$installbin/$perl_verbase$ver$exe_ext");
  32. #strip("$installbin/$perl_verbase$ver$exe_ext");
  33. chmod(0755, "$installbin/$perl_verbase$ver$exe_ext");
  34. }
  35. @@ -369,7 +369,7 @@ elsif ($Is_Cygwin) { # On Cygwin symlink it to CORE to make
  36. Makefile happy
  37. )
  38. } else {
  39. # [als] hard-coded 'libperl' name... not good!
  40. - @corefiles = <*.h libperl*.* perl*$Config{lib_ext}>;
  41. + @corefiles = <*.h libperl*.* cperl*$Config{lib_ext}>;
  42.  
  43. # AIX needs perl.exp installed as well.
  44. push(@corefiles,'perl.exp') if $^O eq 'aix';
  45.  
  46. c:\src\cperl>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement