sccscheck: suppress diff output
authorTony Finch <dot@dotat.at>
Wed, 29 Oct 2014 13:27:56 +0000 (13:27 +0000)
committerTony Finch <dot@dotat.at>
Wed, 29 Oct 2014 13:27:56 +0000 (13:27 +0000)
sccscheck

index dfef881..2783f03 100755 (executable)
--- a/sccscheck
+++ b/sccscheck
@@ -62,7 +62,7 @@ sub found {
                        when (-f "$1/$2") {
                                my $qback = quotemeta $_;
                                my $qfile = quotemeta "$1/$2";
-                               system "diff -u $qback $qfile";
+                               system "diff -u $qback $qfile >/dev/null";
                                if ($?) {
                                        print "BACKDIFF $_\n"
                                } else {