diff --git a/create-module.pl b/create-module.pl
index 5de1b5f16..7bd98c9c5 100755
--- a/create-module.pl
+++ b/create-module.pl
@@ -66,6 +66,7 @@ foreach $m (@ARGV) {
 	system("cd /tmp/create-module && find . -name .svn | xargs rm -rf");
 	system("cd /tmp/create-module && find . -name .git | xargs rm -rf");
 	system("cd /tmp/create-module && find . -name .build | xargs rm -rf");
+	system("cd /tmp/create-module && find . -name .pyc | xargs rm -rf");
 	system("cd /tmp/create-module && find . -name \\*.svn-work | xargs rm -rf");
 	system("cd /tmp/create-module && find . -name \\*.svn-base | xargs rm -rf");
 	system("cd /tmp/create-module && find . -name '*~' -o -name '*.rej' -o -name '*.orig' -o -name '.*.swp' | xargs rm -rf");
diff --git a/makedist.pl b/makedist.pl
index 97dbd5283..c636ad376 100755
--- a/makedist.pl
+++ b/makedist.pl
@@ -109,7 +109,7 @@ foreach $m (@mlist) {
 		next if ($f =~ /^\./ || $f eq "test" || $f =~ /\.bak$/ ||
 		         $f =~ /\.tmp$/ || $f =~ /\.site$/ || $f eq ".builds" ||
 		         $f =~ /\.git$/ || $f eq ".build" || $f eq "distrib" ||
-		         $f =~ /\.(tar|wbm|wbt)\.gz$/ ||
+		         $f =~ /\.(tar|wbm|wbt)\.gz$/ || $f =~ /\.pyc$/ ||
 			 $f eq "README.md" || $f =~ /^makemodule.*\.pl$/ ||
 			 $f eq "linux.sh" || $f eq "freebsd.sh" || 
 			 $f eq "LICENCE" || $f eq "CHANGELOG.md");