Skip to content
Projeler
Gruplar
Parçacıklar
Yardım
Yükleniyor...
Oturum aç / Kaydol
Gezinmeyi değiştir
C
cpython
Proje
Proje
Ayrıntılar
Etkinlik
Cycle Analytics
Depo (repository)
Depo (repository)
Dosyalar
Kayıtlar (commit)
Dallar (branch)
Etiketler
Katkıda bulunanlar
Grafik
Karşılaştır
Grafikler
Konular (issue)
0
Konular (issue)
0
Liste
Pano
Etiketler
Kilometre Taşları
Birleştirme (merge) Talepleri
0
Birleştirme (merge) Talepleri
0
CI / CD
CI / CD
İş akışları (pipeline)
İşler
Zamanlamalar
Grafikler
Paketler
Paketler
Wiki
Wiki
Parçacıklar
Parçacıklar
Üyeler
Üyeler
Collapse sidebar
Close sidebar
Etkinlik
Grafik
Grafikler
Yeni bir konu (issue) oluştur
İşler
Kayıtlar (commit)
Konu (issue) Panoları
Kenar çubuğunu aç
Batuhan Osman TASKAYA
cpython
Commits
e0bdaefa
Kaydet (Commit)
e0bdaefa
authored
Kas 05, 2004
tarafından
Fred Drake
Dosyalara gözat
Seçenekler
Dosyalara Gözat
İndir
Eposta Yamaları
Sade Fark
- remove some bogus <meta> tags from the document head
- clean up some of the generated markup
üst
0384be3b
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
11 deletions
+4
-11
l2hinit.perl
Doc/perl/l2hinit.perl
+4
-11
No files found.
Doc/perl/l2hinit.perl
Dosyayı görüntüle @
e0bdaefa
...
@@ -170,7 +170,7 @@ sub use_icon($$$) {
...
@@ -170,7 +170,7 @@ sub use_icon($$$) {
my $r = get_my_icon($1);
my $r = get_my_icon($1);
$s =~ s/\
<tex2html
_
[
a-z_
]+
_visible_mark
\
>
/$r/;
$s =~ s/\
<tex2html
_
[
a-z_
]+
_visible_mark
\
>
/$r/;
}
}
$s =~ s/
<
[
aA
]
/<
a
rel=
"$rel"
title=
"$title"
\
n
/;
$s =~ s/
<
[
aA
]
/<
a
rel=
"$rel"
title=
"$title"
\
n
/;
$
s =
~
s
/
HREF=
/
href=
/;
$
s =
~
s
/
HREF=
/
href=
/;
return
$
s
;
return
$
s
;
}
}
...
@@ -432,7 +432,7 @@ sub do_cmd_tableofcontents {
...
@@ -432,7 +432,7 @@ sub do_cmd_tableofcontents {
my($closures, $reopens) = preserve_open_tags();
my($closures, $reopens) = preserve_open_tags();
anchor_label('contents', $CURRENT_FILE, $_); # this is added
anchor_label('contents', $CURRENT_FILE, $_); # this is added
$MY_CONTENTS_PAGE = "$CURRENT_FILE";
$MY_CONTENTS_PAGE = "$CURRENT_FILE";
join('', "
<br
/>
\n
\\tableofchildlinks[off]", $closures
join('', "\\tableofchildlinks[off]", $closures
, make_section_heading($toc_title, 'h2'), $toc_mark
, make_section_heading($toc_title, 'h2'), $toc_mark
, $reopens, $_);
, $reopens, $_);
}
}
...
@@ -725,23 +725,16 @@ sub make_head_and_body($$) {
...
@@ -725,23 +725,16 @@ sub make_head_and_body($$) {
$charset = $CHARSET;
$charset = $CHARSET;
$charset =~ s/_/\-/go;
$charset =~ s/_/\-/go;
}
}
# Remove section number from the title for use in the
#
<meta
name=
'description'
...
>
element in the document head.
my $metatitle = "$title";
$metatitle =~ s/^\d+(\.\d+)*\s*//;
$metatitle = meta_information($metatitle);
$metatitle =~ s/ NAME=/ name=/g;
$metatitle =~ s/ CONTENT=/ content=/g;
join('',
join('',
$MY_PARTIAL_HEADER,
$MY_PARTIAL_HEADER,
$metatitle,
"
<title>
", $title, "
</title>
\n
</head>
\n
<body
$
body
>
");
"
<title>
", $title, "
</title>
\n
</head>
\n
<body
$
body
>
");
}
}
sub replace_morelinks {
sub replace_morelinks {
$more_links =~ s/ REL=/ rel=/g;
$more_links =~ s/ REL=/ rel=/g;
$more_links =~ s/ HREF=/ href=/g;
$more_links =~ s/ HREF=/ href=/g;
$more_links =~ s/
<LINK
/<
link
/
g
;
$
more_links =
~
s
/"
>
/" \/>/g;
$_ =~ s/$more_links_mark/$more_links/e;
$_ =~ s/$more_links_mark/$more_links/e;
}
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment