X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=bin%2Fparse-debtags-voc;h=85649a6dddde38a494aafbd5431bc7e77cacfcf0;hb=2cd81017ac27717adcda738074294c4f5cd9e4cd;hp=ebd65471b33dd2af1c8beb61565e02c76cd4e969;hpb=41ab743eae0a7875cf03a8b50a060da06af30b39;p=deb%2Fpackages.git diff --git a/bin/parse-debtags-voc b/bin/parse-debtags-voc index ebd6547..85649a6 100755 --- a/bin/parse-debtags-voc +++ b/bin/parse-debtags-voc @@ -1,8 +1,6 @@ #!/usr/bin/perl -w # Convert Debtags vocabulary.gz files into Sleepycat db files # -# $Id: parse-packages 227 2006-11-12 20:24:48Z djpig $ -# # Copyright (C) 2006 Frank Lichtenheld # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -16,7 +14,7 @@ # You should have received a copy of the GNU General Public License # along with this program; if not, write to the Free Software -# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. use strict; use warnings; @@ -120,7 +118,6 @@ $content{quotemeta} = sub { return quotemeta($_[0]) }; $content{string2id} = sub { return &Packages::CGI::string2id(@_) }; print TAGLST $template->page( 'tag_index', \%content ); -print TAGLST $template->trailer(); close TAGLST or warn "Couldn't close tag list: $!"; rename( "$wwwdir/debtags.en.html.new",