Changeset 27666

Show
Ignore:
Timestamp:
19.06.2013 21:37:26 (6 years ago)
Author:
kjdon
Message:

Using perl rather than bash to test if file is binary, so that this test does not become unrecognised on windows.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • other-projects/nightly-tasks/diffcol/trunk/diffcol/diffcol.pl

    r27604 r27666  
    644644            } 
    645645 
    646             $result=`file -b $strModel`; 
     646            #$result=`file -b $strModel`; # linux specific test for binary file 
     647            $result = (-B $strModel) ? 1 : 0; # perl test for binary file, see http://perldoc.perl.org/functions/-X.html 
    647648            if ( "$result" =~  "data" ) { 
    648649                     VobPrint( "These binary files differ", $intLevel );