|
@@ -7,9 +7,13 @@
|
|
|
DIRA="$1"
|
|
|
DIRB="$2"
|
|
|
|
|
|
-for A in $DIRA/*; do
|
|
|
- B=$DIRB/`basename $A`
|
|
|
- perl -pe 's/^\s*\!*\d+:/ 1:/; s/^([^:]+:)[\d\s]+:/$1/; s/^ *-:(Runs|Programs):.*//;' "$A" > "$A.tmp"
|
|
|
+for B in $DIRB/*; do
|
|
|
+ A=$DIRA/`basename $B`
|
|
|
+ if [ -f $A ]; then
|
|
|
+ perl -pe 's/^\s*\!*\d+:/ 1:/; s/^([^:]+:)[\d\s]+:/$1/; s/^ *-:(Runs|Programs):.*//;' "$A" > "$A.tmp"
|
|
|
+ else
|
|
|
+ cat /dev/null > "$A.tmp"
|
|
|
+ fi
|
|
|
perl -pe 's/^\s*\!*\d+:/ 1:/; s/^([^:]+:)[\d\s]+:/$1/; s/^ *-:(Runs|Programs):.*//;' "$B" > "$B.tmp"
|
|
|
diff -u "$A.tmp" "$B.tmp"
|
|
|
rm "$A.tmp" "$B.tmp"
|