From d75dbf087a404434d2df54f8f9aadbefebaaff08 Mon Sep 17 00:00:00 2001 From: in2 Date: Fri, 4 Jul 2003 03:40:02 +0000 Subject: display something when buildidx git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@1017 63ad8ddf-47c3-0310-b6dd-a9e9d9715204 --- staticweb/manbuilder.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'staticweb') diff --git a/staticweb/manbuilder.pl b/staticweb/manbuilder.pl index dda94a8a..c0b88db1 100755 --- a/staticweb/manbuilder.pl +++ b/staticweb/manbuilder.pl @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: manbuilder.pl,v 1.8 2003/07/04 02:50:36 in2 Exp $ +# $Id: manbuilder.pl,v 1.9 2003/07/04 03:40:02 in2 Exp $ use lib '/home/bbs/bin/'; use strict; use OurNet::FuzzyIndex; @@ -23,6 +23,7 @@ sub main if( /\.db$/ ){ next if( $Getopt::Std::opt_n ); + print "building idx for $_\n"; tie %db, 'DB_File', $_, O_RDONLY, 0666, $DB_HASH; $idx = OurNet::FuzzyIndex->new(substr($_, 0, -3). '.idx'); buildidx(); -- cgit v1.2.3