Thanks to visit codestin.com
Credit goes to github.com

Skip to content

Commit 0e2e687

Browse files
committed
Minor rearranging.
1 parent 4e303aa commit 0e2e687

1 file changed

Lines changed: 5 additions & 3 deletions

File tree

Doc/perl/l2hinit.perl

Lines changed: 5 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -634,16 +634,18 @@ ($$)
634634
# . "\n"
635635
# : ''),
636636
$more_links_mark,
637+
"\n",
637638
($CHARSET && $HTML_VERSION ge "2.1"
638639
? ('<meta http-equiv="Content-Type" content="text/html; '
639640
. "charset=$CHARSET\">\n")
640641
: ''),
641642
($AESOP_META_TYPE
642643
? "<meta name='aesop' content='$AESOP_META_TYPE'>\n" : ''));
643644
}
644-
645-
if (!$charset && $CHARSET) { $charset = $CHARSET; $charset =~ s/_/\-/go; }
646-
645+
if (!$charset && $CHARSET) {
646+
$charset = $CHARSET;
647+
$charset =~ s/_/\-/go;
648+
}
647649
join('',
648650
$MY_PARTIAL_HEADER,
649651
&meta_information($title),

0 commit comments

Comments
 (0)