2005-01-12 11:40:59 +01:00
|
|
|
#! /usr/bin/perl -w -I/home/eelco/nix/scripts
|
|
|
|
|
|
|
|
use strict;
|
|
|
|
use readmanifest;
|
|
|
|
|
|
|
|
for my $p (@ARGV) {
|
|
|
|
|
|
|
|
my %narFiles;
|
2007-01-23 17:50:19 +01:00
|
|
|
my %localPaths;
|
2005-01-12 11:40:59 +01:00
|
|
|
my %patches;
|
|
|
|
|
2007-01-23 17:50:19 +01:00
|
|
|
readManifest $p, \%narFiles, \%localPaths, \%patches;
|
2005-01-12 11:40:59 +01:00
|
|
|
|
|
|
|
%patches = ();
|
|
|
|
|
2007-01-23 17:50:19 +01:00
|
|
|
writeManifest $p, \%narFiles, \%patches;
|
2005-01-12 11:40:59 +01:00
|
|
|
}
|