diff options
| author | Laura Arjona Reina <larjona@debian.org> | 2019-07-22 21:23:06 +0200 |
|---|---|---|
| committer | Laura Arjona Reina <larjona@debian.org> | 2019-07-22 21:23:06 +0200 |
| commit | 428ac264d8ee61013b55fc83868bc0ac6e92f480 (patch) | |
| tree | 722ed3f5f7ecabf7716d3a16f7868a30edadc55b /remove_stale.pl | |
| parent | 15abed1abdacba245cff36dd94c8c268a3032ebe (diff) | |
Look at if we have commits of a file to know if it's in the VCS. It produces some warnings but I think it's a step toward actually finding the files we need to remove
Diffstat (limited to 'remove_stale.pl')
| -rwxr-xr-x | remove_stale.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/remove_stale.pl b/remove_stale.pl index dea27ebe01b..742fe985805 100755 --- a/remove_stale.pl +++ b/remove_stale.pl @@ -191,7 +191,9 @@ sub find_stale_files next if $haswml; # is the html file checked in the VCS? - my $checkedin = $VCS->file_info($htmlfile , quiet => 1 ) ? 1 : 0; + my %file_info = $VCS->file_info( $htmlfile ); + my $checkedin = $file_info{'cmt_rev'} or 0; + vvlog("is $htmlfile checked in the VCS? $checkedin"); next if $checkedin; #if ($checkedin) |