Re: embedded perl and top_env problem

[p5sagit/p5-mst-13.2.git] / x2p / cflags.SH

diff --git a/x2p/cflags.SH b/x2p/cflags.SH
index 87ff047..62bd11c 100755 (executable)
--- a/x2p/cflags.SH
+++ b/x2p/cflags.SH
@@ -14,7 +14,14 @@ esac
 : This forces SH files to create target in same directory as SH file.
 : This is so that make depend always knows where to find SH derivatives.
 case "$0" in
-*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
+*/cflags.SH) cd `expr X$0 : 'X\(.*\)/'` ;;
+cflags.SH) ;;
+*) case `pwd` in
+   */x2p) ;;
+   *) if test -d x2p; then cd x2p
+      else echo "Can't figure out where to write output."; exit 1
+         fi;;
+   esac;;
 esac
 echo "Extracting x2p/cflags (with variable substitutions)"
 : This section of the file will have variable substitutions done on it.