Fix error message.

[empserver] / info / findsubj.pl

diff --git a/info/findsubj.pl b/info/findsubj.pl
index 751713bfe65a5786034c1059436604203d967333..be2a8be221b5f9d56cd65d46d632db807cb9eaba 100644 (file)
--- a/info/findsubj.pl
+++ b/info/findsubj.pl
@@ -199,6 +199,6 @@ sub parse_see_also {
 sub error {
     my ($error) = @_;
 
-    print STDERR "info.pl:$filename:$.: $error\n";
+    print STDERR "findsubj.pl:$filename:$.: $error\n";
     exit 1;
 }