diff --git a/misc/gendoc.pl b/misc/gendoc.pl
index ba9ac68..0eec946 100644
--- a/misc/gendoc.pl
+++ b/misc/gendoc.pl
@@ -55,11 +55,9 @@ DARPA/SPAWAR contract N66001-01-C-8035
 as part of the DARPA CHATS research program.
 .Pp
 The OpenPAM library is maintained by
-.An Dag-Erling Sm\\(/orgrav Aq des\@des.no .
-",
+.An Dag-Erling Sm\\(/orgrav Aq des\@des.no .",
     UIO => "developed for the University of Oslo by
-.An Dag-Erling Sm\\(/orgrav Aq des\@des.no .
-",
+.An Dag-Erling Sm\\(/orgrav Aq des\@des.no .",
     DES => "developed by
 .An Dag-Erling Sm\\(/orgrav Aq des\@des.no .",
 );
@@ -437,9 +435,10 @@ sub gendoc($) {
 
     return if defined($$func{nodoc});
 
+    $$func{source} =~ m/([^\/]+)$/;
     $mdoc = ".\\\" Generated from $1 by gendoc.pl\n";
-    if ($func->{'version'}) {
-	$mdoc .= ".\\\" $func->{'version'}\n";
+    if ($$func{version}) {
+	$mdoc .= ".\\\" $$func{version}\n";
     }
     $mdoc .= ".Dd $TODAY
 .Dd $TODAY
@@ -582,7 +581,7 @@ sub gensummary($) {
 
     $page =~ m/(\w+)$/;
     $upage = uc($1);
-    print FILE "$COPYRIGHT
+    print FILE ".\\\" Generated by gendoc.pl
 .Dd $TODAY
 .Dt $upage 3
 .Os