Bug#919844: changetrack: "find2perl" is missing and thus breaks filename patterns prefixed with "@"

[Lars Kruse <devel@sumpfralle.de>]

Package: changetrack
Version: 4.7-5
Severity: normal
Tags: patch upstream

Dear Maintainer,

changetrack allows the specification of patterns for "find" to be used
in /etc/changetrack.  A use case is the exclusion of specific files
below /etc/ from the change tracking.

Example (excluding daily updated revocation lists):
 @/etc/ -type f ! -name 'foo*.crl'

The above pattern requires the tool "find2perl", which was shipped along
with perl.  In perl 5.22.0 the tool "find2perl" was removed, due to
being released separately via CPAN.
(see /usr/share/perl/5.28.1/pod/perl5220delta.pod)

Thus changetrack fails to work due to the absence of "find2perl" since
Stretch, if a filename pattern with the "@" prefix is configured.

The attached patch fixes the issue by using "find" instead of
"find2perl" (the latter was supposed to be a faster alternative to
"find").

Cheers,
Lars

--- /usr/bin/changetrack.orig	2016-12-30 01:58:25.000000000 +0100
+++ /usr/bin/changetrack	2019-01-20 04:41:55.154600278 +0100
@@ -164,7 +164,7 @@
         my $rest = substr($filename,1);
 				
         # execute as find command
-        @files = split '\0', `find2perl $rest -print0 |perl`;
+        @files = split '\0', `find $rest -print0`;
     }
     else
     {