create .orig files

[swftools.git] / lib / pdf / inject-xpdf.pl

diff --git a/lib/pdf/inject-xpdf.pl b/lib/pdf/inject-xpdf.pl
index 8693f81..e893013 100755 (executable)
--- a/lib/pdf/inject-xpdf.pl
+++ b/lib/pdf/inject-xpdf.pl
@@ -15,7 +15,7 @@ system("tar -zxvf ../../$filename") and die;
 system("find -type f -exec mv {} .. \\;") and die;
 chdir("..");
 system("find -type d -exec rmdir {} \\; 2> /dev/null");
-system("patch --verbose < ../xpdf-changes.patch") and die;
+system("patch < ../xpdf-changes.patch");
 chdir("..");
 system("rm -f xpdf");
 system("ln -s $directory xpdf");
@@ -29,8 +29,9 @@ VERSION=\$1
 PS3="choose> "
 
 if test "x\$VERSION" = "x";then
-    select V in stable latest;do VERSION="$V";break;done
+    select V in stable latest;do VERSION="\$V";break;done
 fi
+case $VERSION
 
 if test "x\$VERSION" = "xstable";then
     echo "Switching to stable version"
@@ -46,3 +47,7 @@ EOF
 close(fi);
 system("chmod a+x switch");
 
+$c = 'find '.$directory.' \( -name "*.cc" -or -name "*.h" -or -name "*.c" \) -exec cp {} {}.orig \;';
+print "$c\n";
+system($c);
+