Changeset 550b73d

Timestamp:

Jan 20, 2009, 4:31:32 PM (15 years ago)

Author:

Jim Gifford <clfs@…>

Branches:

clfs-1.2, clfs-2.1, clfs-3.0.0-systemd, clfs-3.0.0-sysvinit, master, systemd, sysvinit

Children:

42622bd

Parents:

9676bac

Message:

Update Perl Branch Script

File:

• scripts/patch/perl-patch.sh (modified) (1 diff)

scripts/patch/perl-patch.sh

@@ -32 +32 @@
 cd /usr/src
 FIXEDVERSION=$(echo ${VERSION} | sed -e 's ..$  ')
-rsync -avz rsync://perl5.git.perl.org/APC/perl-${FIXEDVERSION}.x perl-${VERSION}
+rsync -avz rsync://perl5.git.perl.org/APC/perl-${FIXEDVERSION}.x tmp
+cd tmp
+mv perl-${FIXEDVERSION}.x /usr/src/perl-${VERSION}
 
 # Cleanup
 #
-DIRS="perl-${VERSION} perl-${VERSION}.orig"
-for DIRECTORY in ${DIRS}; do
-  cd /usr/src/${DIRECTORY}
-  FILE_LIST=".patch"
-  for files in ${FILE_LIST}; do
-    REMOVE=$(find * -name ${files})
-    for file in $REMOVE; do
-      rm -f ${file}
-    done
-  done
+cd /usr/src/perl-${VERSION}
+REMOVE=".patch AUTHORS Changes*"
+for file in $REMOVE; do
+  cd /usr/src/perl-${VERSION}
+  rm -f ${file}
+  cd /usr/src/perl-${VERSION}.orig
+  rm -f ${file}
+done
+cd ..
 
-  REMOVE="Changes Changes5.10 Changes5.8"
-  for file in $REMOVE; do
-    rm -f ${file}
-    done
-    cd ..
+# Remove Directories
+#
+cd /usr/src/perl-${VERSION}
+REMOVE="os2 vms win32"
+for dir in $REMOVE; do
+  cd /usr/src/perl-${VERSION}
+  rm -rf ${dir}
+  cd /usr/src/perl-${VERSION}.orig
+  rm -rf ${dir}
 done
-
-# Cleanup Directory
-#
-for dir in $(find * -type d); do
-  cd /usr/src/perl-${VERSION}
-  for file in $(find . -name '*~'); do
-    rm -f ${file}
-  done
-  for file in $(find . -name '*.orig'); do
-    rm -f ${file}
-  done
-done
-cd /usr/src/perl-${VERSION}
-rm -f *~ *.orig
-rm -f /usr/src/perl-${VERSION}.orig/md5.sum
+cd ..
 
 # Create Patch