projects
/
feisty_meow.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of feistymeow.org:feisty_meow
[feisty_meow.git]
/
scripts
/
text
/
differ.pl
diff --git
a/scripts/text/differ.pl
b/scripts/text/differ.pl
index cd1c3353ea50f47d4ef47ef1c4db007939019cd4..3a117669707970f062be8f1f1028a73fecd351de 100644
(file)
--- a/
scripts/text/differ.pl
+++ b/
scripts/text/differ.pl
@@
-35,8
+35,9
@@
if ($#ARGV < 0) {
local($destination) = $ARGV[0];
local($source) = ".";
if ($#ARGV > 0) {
local($destination) = $ARGV[0];
local($source) = ".";
if ($#ARGV > 0) {
- # get the location they provided.
- $source = $ARGV[1];
+ # use both the locations they provided.
+ $source = $ARGV[0];
+ $destination = $ARGV[1];
}
# make the names a little more manipulable.
}
# make the names a little more manipulable.
@@
-116,9
+117,17
@@
sub recurse_dirs
local($compare_name) = $dest . "/" . $name;
# print "name is $name and to compare is $compare_name.\n";
local($new_name) = $src . "/" . $name;
local($compare_name) = $dest . "/" . $name;
# print "name is $name and to compare is $compare_name.\n";
local($new_name) = $src . "/" . $name;
+#hmmm: need an is important dirname check for this.
if ( (-d $new_name) && ($name ne ".") && ($name ne "..")
&& ($name ne ".svn")
&& ($name ne ".git")
if ( (-d $new_name) && ($name ne ".") && ($name ne "..")
&& ($name ne ".svn")
&& ($name ne ".git")
+ && ($name ne "bin")
+ && ($name ne "bin-eclipse")
+ && ($name ne "bin.eclipse")
+ && ($name ne "genned-src")
+ && ($name ne "genned-obj")
+ && ($name ne "codegen")
+ && ($name ne "unit-test-reports")
&& ($name ne "CVS") ) {
# print "recursing on: source $name and destination $compare_name.\n";
&recurse_dirs($new_name, $compare_name);
&& ($name ne "CVS") ) {
# print "recursing on: source $name and destination $compare_name.\n";
&recurse_dirs($new_name, $compare_name);