X-Git-Url: http://git.jankratochvil.net/?p=MyWeb.git;a=blobdiff_plain;f=Web.pm;h=4436247d4b055fda6fe95c361f260658d4b2ae5e;hp=845e96c77f0c0e20ad9147f495d668a85e931edc;hb=55557c1dfc60f6f77c1ace1d0dce5d5009800fc3;hpb=f24844a7820f9f1a625fe7aac3fd1eddaf4b9572

diff --git a/Web.pm b/Web.pm
index 845e96c..4436247 100644
--- a/Web.pm
+++ b/Web.pm
@@ -276,7 +276,7 @@ sub footer (;$)
 		my $cvs_id=(eval('$'.$package."::CVS_ID")
 #				|| $package	# debug
 				);
-		print '<!-- $'.$cvs_id.'$ -->'."\n" if $cvs_id;
+		print '<!-- '.$package.' - $'.$cvs_id.'$ -->'."\n" if $cvs_id;
 		}
 
 	if ($W->{"heading"}) {