Index: /locker/sbin/parallel-find.pl
===================================================================
--- /locker/sbin/parallel-find.pl	(revision 729)
+++ /locker/sbin/parallel-find.pl	(revision 730)
@@ -20,4 +20,18 @@
 # use -xdev.  May miss libraries stuff.
 
+sub updatable ($) {
+    my $filename = shift;
+    for my $l (`fs la "$filename"`) {
+        return 1 if ($l =~ /^  system:scripts-security-upd rlidwk/);
+    }
+    return 0;
+}
+
+sub version ($) {
+    my $dirname = shift;
+    open my $h, "$dirname/.scripts-version";
+    return (<$h>)[-1];
+}
+
 sub find ($$) {
     my $user = shift;
@@ -27,5 +41,12 @@
     open my $out, ">$dump/$user";
     while (my $f = <$files>) {
-        print $out $f;
+        chomp $f;
+        $f =~ s!/\.scripts-version$!!;
+        if (! updatable($f)) {
+            print STDERR "not updatable: $f";
+            next;
+        }
+        $v = version($f);
+        print $out "$f:$v";
     }
     return 0;