* Script to remove patches from manifests.

2005-01-12 10:40:59 +00:00 · 2005-01-12 10:40:59 +00:00 · b17e7cf979
parent 0bc41f632b
commit b17e7cf979
1 changed files with 19 additions and 0 deletions
--- a/scripts/remove-patches.pl
+++ b/scripts/remove-patches.pl
@ -0,0 +1,19 @@
+#! /usr/bin/perl -w -I/home/eelco/nix/scripts
+
+use strict;
+use readmanifest;
+
+for my $p (@ARGV) {
+
+    my %narFiles;
+    my %patches;
+    my %successors;
+
+    readManifest $p,
+        \%narFiles, \%patches, \%successors;
+
+    %patches = ();
+    
+    writeManifest $p,
+        \%narFiles, \%patches, \%successors;
+}