diff options
| author | Fred Drake <fdrake@acm.org> | 2002-04-05 17:34:50 (GMT) |
|---|---|---|
| committer | Fred Drake <fdrake@acm.org> | 2002-04-05 17:34:50 (GMT) |
| commit | e03e1fe5ccabbc140483550ba6648dcd110b792b (patch) | |
| tree | f6e13c608a6e2eb455f1a3cbd2be8c98e078332c /Doc/perl | |
| parent | cc8fe0407a66acc267b60386e9346f3539e0ffae (diff) | |
| download | cpython-e03e1fe5ccabbc140483550ba6648dcd110b792b.zip cpython-e03e1fe5ccabbc140483550ba6648dcd110b792b.tar.gz cpython-e03e1fe5ccabbc140483550ba6648dcd110b792b.tar.bz2 | |
Add support for the "Aesop Meta Tag". Not widely used, but not a bad idea,
either.
Diffstat (limited to 'Doc/perl')
| -rw-r--r-- | Doc/perl/l2hinit.perl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl index 0bc9aa5..b7ade49 100644 --- a/Doc/perl/l2hinit.perl +++ b/Doc/perl/l2hinit.perl @@ -37,6 +37,8 @@ $HAVE_MODULE_INDEX = 0; $HAVE_GENERAL_INDEX = 0; $HAVE_TABLE_OF_CONTENTS = 0; +$AESOP_META_TYPE = 'information'; + # A little painful, but lets us clean up the top level directory a little, # and not be tied to the current directory (as far as I can tell). Testing @@ -639,6 +641,8 @@ sub make_head_and_body { , "<html>\n<head>\n<title>", $title, "</title>\n" , &meta_information($title) , $MY_PARTIAL_HEADER + , ($AESOP_META_TYPE eq '' ? '' + : "\n<meta name='aesop' content='$AESOP_META_TYPE'>") , "\n</head>\n<body$body>"); } |