0
0
Fork 0
forked from lix-project/lix
lix/scripts/remove-patches.pl
2011-04-06 09:16:22 +00:00

17 lines
251 B
Perl
Executable file

#! /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;
}