blob: 401771a27d768e7a6e86a0cce0a4d9a44aa6af02 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
#! /usr/bin/perl -w -I/home/eelco/nix/scripts
use strict;
use readmanifest;
for my $p (@ARGV) {
my %narFiles;
my %patches;
readManifest $p, \%narFiles, \%patches;
%patches = ();
writeManifest $p, \%narFiles, \%patches;
}
|
