From 97c0042c04d90801bfdcca258d2b92836ac8025a Mon Sep 17 00:00:00 2001
From: "Tomas V.V.Cox" <cox@php.net>
Date: Wed, 18 Jul 2001 17:13:38 +0000
Subject: [PATCH] - always write a the package definition file as 'package.xml'
 inside the package - other clean-up's

---
 pear/PEAR/Packager.php | 17 +++++++++++------
 1 file changed, 11 insertions(+), 6 deletions(-)

diff --git a/pear/PEAR/Packager.php b/pear/PEAR/Packager.php
index 325bcc461c..2a56fb73a6 100644
--- a/pear/PEAR/Packager.php
+++ b/pear/PEAR/Packager.php
@@ -24,6 +24,10 @@ require_once 'PEAR/Common.php';
 /**
  * Administration class used to make a PEAR release tarball.
  *
+ * TODO:
+ *  - add an extra param the dir where to place the created package
+ *  - preserve file permissions (solve umask in copy problem)
+ *
  * @since PHP 4.0.2
  * @author Stig Bakken <ssb@fast.no>
  */
@@ -139,13 +143,12 @@ class PEAR_Packager extends PEAR_Common
             return $this->raiseError("Unable to create temporary directory $this->tmpdir.",
                               null, PEAR_ERROR_TRIGGER, E_USER_ERROR);
         } else {
-            $this->log(2, "...TmpDir created at: " . $this->tmpdir);
+            $this->log(2, "+ tmp dir created at: " . $this->tmpdir);
         }
         $this->_tempfiles[] = $this->tmpdir;
 
         // Copy files -----------------------------------------------
-        $files = &$pkginfo['filelist'];
-        foreach ($files as $fname => $atts) {
+        foreach ($pkginfo['filelist'] as $fname => $atts) {
             $file = $this->tmpdir . DIRECTORY_SEPARATOR . $fname;
             $dir = dirname($file);
             if (!@is_dir($dir)) {
@@ -156,14 +159,16 @@ class PEAR_Packager extends PEAR_Common
             if (!@copy($fname, $file)) {
                 $this->log(0, "could not copy $fname to $file");
             } else {
-                $this->log(2, "...copying from $fname to $file");
+                $this->log(2, "+ copying from $fname to $file");
             }
         }
         // XXX TODO: Rebuild the package file as the old method did?
-        if (!@copy($pkgfile, $this->tmpdir . DIRECTORY_SEPARATOR . $pkgfile)) {
+
+        // This allows build packages from different pear pack def files
+        if (!@copy($pkgfile, $this->tmpdir . DIRECTORY_SEPARATOR . 'package.xml')) {
             return $this->raiseError("could not copy $pkgfile to " . $this->tmpdir);
         }
-        $this->log(2, "...copying package $pkgfile to " . $this->tmpdir);
+        $this->log(2, "+ copying package $pkgfile to " . $this->tmpdir);
 
         // TAR the Package -------------------------------------------
         chdir(dirname($this->tmpdir));
-- 
2.50.1