This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove vestigial *.SH code which can link the extracted file into ../
authorNicholas Clark <nick@ccl4.org>
Wed, 15 May 2013 10:33:05 +0000 (12:33 +0200)
committerNicholas Clark <nick@ccl4.org>
Mon, 20 May 2013 19:50:45 +0000 (21:50 +0200)
4 of the *.SH files have code which links the extracted file into the parent
directory if the current directory ends SH. This code dates from Perl 1.
It seems that the intent was that the *.SH files could live in a SH/
directory, but that feature was neither used or mentioned in the
documentation in Perl 1, and hasn't been used since.

Cross/Makefile-cross-SH
Makefile.SH
makedepend.SH
x2p/Makefile.SH

index e5a14b4..f14bc81 100644 (file)
@@ -1281,12 +1281,6 @@ ctags:
 !NO!SUBS!
 
 $eunicefix $Makefile
-case `pwd` in
-*SH)
-    $rm -f ../$Makefile
-    $ln $Makefile ../$Makefile
-    ;;
-esac
 $rm -f $firstmakefile
 
 # Now do any special processing required before building.
index ddb9be1..36c7e16 100755 (executable)
@@ -1604,12 +1604,6 @@ ctags:
 !NO!SUBS!
 
 $eunicefix Makefile
-case `pwd` in
-*SH)
-    $rm -f ../Makefile
-    $ln Makefile ../Makefile
-    ;;
-esac
 $rm -f $firstmakefile
 
 # Now do any special processing required before building.
index 5669b8d..0c3cf18 100755 (executable)
@@ -279,9 +279,3 @@ rmdir .depending
 !NO!SUBS!
 $eunicefix makedepend
 chmod +x makedepend
-case `pwd` in
-*SH)
-    $rm -f ../makedepend
-    ln makedepend ../makedepend
-    ;;
-esac
index 3f16623..55d338f 100755 (executable)
@@ -194,10 +194,4 @@ $(obj):
 makedepend: depend
 !NO!SUBS!
 $eunicefix Makefile
-case `pwd` in
-*SH)
-    $rm -f ../Makefile
-    $ln Makefile ../Makefile
-    ;;
-esac
 rm -f $firstmakefile