X-Git-Url: http://git.grml.org/?a=blobdiff_plain;f=grml-tips-tags;h=a7a4d49eea90e7483c20a60d1b7f190ef85a03a4;hb=ebcc0d962aa4a7c960c089ec90e5d3c09a932d71;hp=3b27469e0dad1cb12e1b80c444dc5b4538237597;hpb=b463afed782b6438403aa1b44d128c8ae0eb1c50;p=grml-tips.git

diff --git a/grml-tips-tags b/grml-tips-tags
index 3b27469..a7a4d49 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)