e-smith-devtools/sme8/e-smith-devtools-2.2.0-compiledpython.patch

diff -up e-smith-devtools-2.2.0/genfilelist.compiledpython e-smith-devtools-2.2.0/genfilelist
--- e-smith-devtools-2.2.0/genfilelist.compiledpython   2006-03-16 03:06:17.000000000 -0700
+++ e-smith-devtools-2.2.0/genfilelist  2009-10-26 13:35:24.000000000 -0600
@@ -212,20 +212,28 @@ sub process
     }
     elsif (-f)
     {
-       #  Some files get special permissions and ownership
-       my $dir = (dirname $path) . '/';
+        my (@paths) = ($path);
 
-       # Special permissions per file
-       if (defined $::fileperms{$path})
-       {
-           print "$::fileperms{$path} ";
-       }
-       # Special permissions or per containing directory
-       elsif (defined $::fileperms{$dir})
-       {
-           print "$::fileperms{$dir} ";
-       }
-       print "$path\n";
+        # Add compiled python files
+        push @paths, "${path}c" if $path =~ m{\.py$};
+        push @paths, "${path}o" if $path =~ m{\.py$};
+
+        foreach $path (@paths) {
+            #  Some files get special permissions and ownership
+            my $dir = (dirname $path) . '/';
+
+            # Special permissions per file
+            if (defined $::fileperms{$path})
+            {
+                print "$::fileperms{$path} ";
+            }
+            # Special permissions or per containing directory
+            elsif (defined $::fileperms{$dir})
+            {
+                print "$::fileperms{$dir} ";
+            }
+            print "$path\n";
+        }
     }
     else
     {
1	diff -up e-smith-devtools-2.2.0/genfilelist.compiledpython e-smith-devtools-2.2.0/genfilelist
2	--- e-smith-devtools-2.2.0/genfilelist.compiledpython 2006-03-16 03:06:17.000000000 -0700
3	+++ e-smith-devtools-2.2.0/genfilelist 2009-10-26 13:35:24.000000000 -0600
4	@@ -212,20 +212,28 @@ sub process
5	}
6	elsif (-f)
7	{
8	- # Some files get special permissions and ownership
9	- my $dir = (dirname $path) . '/';
10	+ my (@paths) = ($path);
11
12	- # Special permissions per file
13	- if (defined $::fileperms{$path})
14	- {
15	- print "$::fileperms{$path} ";
16	- }
17	- # Special permissions or per containing directory
18	- elsif (defined $::fileperms{$dir})
19	- {
20	- print "$::fileperms{$dir} ";
21	- }
22	- print "$path\n";
23	+ # Add compiled python files
24	+ push @paths, "${path}c" if $path =~ m{\.py$};
25	+ push @paths, "${path}o" if $path =~ m{\.py$};
26	+
27	+ foreach $path (@paths) {
28	+ # Some files get special permissions and ownership
29	+ my $dir = (dirname $path) . '/';
30	+
31	+ # Special permissions per file
32	+ if (defined $::fileperms{$path})
33	+ {
34	+ print "$::fileperms{$path} ";
35	+ }
36	+ # Special permissions or per containing directory
37	+ elsif (defined $::fileperms{$dir})
38	+ {
39	+ print "$::fileperms{$dir} ";
40	+ }
41	+ print "$path\n";
42	+ }
43	}
44	else
45	{