do_cmd_datalineni():  New function, to implement the non-indexing form
                      of \dataline.
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 6b67df5..c6306dc 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -773,6 +773,12 @@
     return "<dt><b>$idx</b><dd>" . $_;
 }
 
+sub do_cmd_datalineni{
+    local($_) = @_;
+    my $data_name = next_argument();
+    return "<dt><b><tt>$data_name</tt></b><dd>" . $_;
+}
+
 sub do_env_excdesc{
     local($_) = @_;
     my $excname = next_argument();