MFH partial fix, bug #1163: rpm build doesn't build properly

diff --git a/pear/PEAR/Command/Package.php b/pear/PEAR/Command/Package.php
index 645d382ba821acc6f9a83c618df60b5b38e61e91..e22e03316d8bff1cc22f98863e14498b0102acc1 100644 (file)
--- a/pear/PEAR/Command/Package.php
+++ b/pear/PEAR/Command/Package.php
@@ -639,6 +639,9 @@ Wrote: /usr/src/redhat/RPMS/i386/PEAR::Net_Socket-1.0-1.i386.rpm
         $srcfiles = 0;
         foreach ($info['filelist'] as $name => $attr) {
 
+            if (!isset($attr['role'])) {
+                continue;
+            }
             if ($attr['role'] == 'doc') {
                 $info['doc_files'] .= " $name";
 
@@ -677,6 +680,7 @@ Wrote: /usr/src/redhat/RPMS/i386/PEAR::Net_Socket-1.0-1.i386.rpm
 
                 }
 
+                $name = str_replace('\\', '/', $name);
                 $info['files'] .= "$prefix/$name\n";
 
             }