Re: [l2h] Can no longer have newlines in \author address

[Julius Smith]

Under conditions I have not fully characterized, the entire author address 
is sometimes left justified while other author data are centered.  The 
following override to make_singleauthor_title ($alignl replaced by $alignc) 
fixes this problem in all cases I have tried.  However, I do not understand 
why $alignl was ever needed, so this change cannot really be right.  It 
makes the $alignl argument completely unnecessary.

Julius

sub make_singleauthor_title {
    local($alignc, $alignl , $t_author
        , $t_affil,$t_institute,$t_date,$t_address,$t_email,$t_authorURL) 
= (@_);
    my $t_title = '';
    my ($s_author_info, $e_author_info) = ('<DIV','</DIV>');
    $s_author_info .= ($USING_STYLES ? ' CLASS="author_info"' : '').'>';

    if ($t_author) {
        if ($t_authorURL) {
            local($href) = &translate_commands($t_authorURL);
            $href = &make_named_href('author'
                        , $href, "<STRONG>${t_author}</STRONG>");
            $t_title .= "\n<P$alignc>$href</P>";
        } else {
            $t_title .= "\n<P$alignc><STRONG>$t_author</STRONG></P>";
        }
    } else { &write_warnings("\nThere is no author for this document."); }
    if ($t_institute&&!($t_institute=~/^\s*(($O|$OP)\d+($C|$CP))\s*\1\s*$/)) {
        $t_title .= "\n<P$alignc><SMALL>$t_institute</SMALL></P>";}
    if ($t_affil&&!($t_affil=~/^\s*(($O|$OP)\d+($C|$CP))\s*\1\s*$/)) {
        $t_title .= "\n<P$alignc><I>$t_affil</I></P>";}
    if ($t_date&&!($t_date=~/^\s*(($O|$OP)\d+($C|$CP))\s*\1\s*$/)) {
        $t_title .= "\n<P$alignc><STRONG>$t_date</STRONG></P>";}
    if ($t_address&&!($t_address=~/^\s*(($O|$OP)\d+($C|$CP))\s*\1\s*$/)) {
#JOS:   $t_title .= "\n<P$alignl><SMALL>$t_address</SMALL></P>";
        $t_title .= "\n<P$alignc><SMALL>$t_address</SMALL></P>";
    }  # else { $t_title .= "\n<P$alignl>"}
    if ($t_email&&!($t_email=~/^\s*(($O|$OP)\d+($C|$CP))\s*\1\s*$/)) {
#JOS:   $t_title .= "\n<P$alignl><SMALL>$t_email</SMALL></P>";
        $t_title .= "\n<P$alignc><SMALL>$t_email</SMALL></P>";
    }  # else { $t_title .= "</P>" }
    join("\n", $s_author_info, $t_title, $e_author_info);
}
_______________________________________________
latex2html mailing list
[EMAIL PROTECTED]
http://tug.org/mailman/listinfo/latex2html