From: Alexander Wirt <formorer@grml.org>
Date: Wed, 11 Jan 2012 12:45:44 +0000 (+0100)
Subject: Write into tag file
X-Git-Tag: v0.6.2~8
X-Git-Url: https://git.grml.org/?p=grml-tips.git;a=commitdiff_plain;h=691fd5b99dda8c70c8fd5443b4e0e57e29021008

Write into tag file
---

diff --git a/grml-tips-tags b/grml-tips-tags
index 3b27469..8726205 100755
--- a/grml-tips-tags
+++ b/grml-tips-tags
@@ -24,9 +24,12 @@ while (my $line = <$fh>) {
     push @tags, split(/[, ]+/, $1);
 }
 
+close ($fh);
 #make tags unique
 my %seen = ();
 @tags = grep { ! $seen{$_} ++ } @tags;
 
+open (my $fh, '>', '/usr/share/grml-tips/tags') 
+	or die "Could not open '/usr/share/grml-tips/tags' for writing: $!"
 print $fh join("\n", @tags) . "\n";
 close($fh)