From f8a321013b2d53aeddf3593b8905f653e65199d8 Mon Sep 17 00:00:00 2001 From: Paul Poulain Date: Mon, 1 Oct 2012 17:42:23 +0200 Subject: [PATCH] Bug 7642 follow-up fix POD The patch for bug 7642 did not introduce this error, but the QA tools detected it, so I fixed it Signed-off-by: Chris Cormack --- C4/Tags.pm | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/C4/Tags.pm b/C4/Tags.pm index f84dabb5d7..951020df83 100644 --- a/C4/Tags.pm +++ b/C4/Tags.pm @@ -60,6 +60,12 @@ BEGIN { } } +=head1 C4::Tags.pm - Support for user tagging of biblios. + +More verose debugging messages are sent in the presence of non-zero $ENV{"DEBUG"}. + +=cut + INIT { $ext_dict and $Lingua::Ispell::path = $ext_dict; $debug and print STDERR "\$Lingua::Ispell::path = $Lingua::Ispell::path\n"; @@ -606,10 +612,6 @@ sub stratify_tags { 1; __END__ -=head1 C4::Tags.pm - Support for user tagging of biblios. - -More verose debugging messages are sent in the presence of non-zero $ENV{"DEBUG"}. - =head2 add_tag(biblionumber,term[,borrowernumber]) =head3 TO DO: Add real perldoc -- 2.39.5