[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);
}