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