[dw-free] refactor common code in sitescheme files
[commit: http://hg.dwscoalition.org/dw-free/rev/9f7af1eaa2e0]
http://bugs.dwscoalition.org/show_bug.cgi?id=2990
Refactor out some common code, for easier maintainability.
Patch by
kareila.
Files modified:
http://bugs.dwscoalition.org/show_bug.cgi?id=2990
Refactor out some common code, for easier maintainability.
Patch by
![[personal profile]](https://www.dreamwidth.org/img/silk/identity/user.png)
Files modified:
- cgi-bin/bml/scheme/blueshift.look
- cgi-bin/bml/scheme/celerity.look
- cgi-bin/bml/scheme/common.look
- cgi-bin/bml/scheme/gradation-horizontal.look
- cgi-bin/bml/scheme/gradation-vertical.look
-------------------------------------------------------------------------------- diff -r 207c7ed022f8 -r 9f7af1eaa2e0 cgi-bin/bml/scheme/blueshift.look --- a/cgi-bin/bml/scheme/blueshift.look Thu Sep 23 17:50:28 2010 +0800 +++ b/cgi-bin/bml/scheme/blueshift.look Thu Sep 23 17:53:58 2010 +0800 @@ -14,19 +14,7 @@ # the same terms as Perl itself. For a copy of the license, please reference # 'perldoc perlartistic' or 'perldoc perlgpl'. -_parent=>global.look - -h1=>{D}<h1>%%data%%</h1> -h2=>{D}<h2>%%data%%</h2> -p=>{D}<p>%%data%%</p> -hr=><hr /> - -de=>span style='font-size: smaller;'>%%data%%</span> -emailex=><div style='width: 50%; font-family: courier; background-color: #efefef; border: dotted #cdcdcd 2px; padding: 5px;'>%%data%%</div> - -standout<= -{DRps}<div class='standout'><table class='standout-inner'><tr><td>%%data%%</td></tr></table></div> -<=standout +_parent=>common.look head<= <head> @@ -54,137 +42,13 @@ head<= </head> <=head -logo<= -<span id='sitename'><a href="<?siteroot?>"><?_code $LJ::SITENAMESHORT _code?></a></span> -<=logo - -accountlinks<= -<?_code -{ - my $remote = LJ::get_remote(); - my $ret; - - if ( $remote ) { - my $userpic = $remote->userpic; - my $inbox = $remote->notification_inbox; - my $unread = $inbox->unread_count; - my $identity = $remote->is_identity; - - $ret .= "<div id='account-links-userpic'><a href='$LJ::SITEROOT/editicons'>"; - - if ( $userpic ) { - my $wh = $userpic->img_fixedsize( width => 80, height => 80 ); - $ret .= "<img src='" . $userpic->url . "' $wh alt=\"$ML{'sitescheme.accountlinks.userpic.alt'}\" />"; - } else { - $ret .= LJ::img( "nouserpic_sitescheme", "" ); - } - $ret .= "</a></div>"; - $ret .= "<div id='account-links-text'>"; - $ret .= "<form action='$LJ::SITEROOT/logout?ret=1' method='post'>"; - $ret .= $remote->ljuser_display; - $ret .= "<input type='hidden' name='user' value='" . $remote->user . "' />"; - $ret .= "<input type='hidden' name='sessid' value='$remote->{_session}->{sessid}' />"; - $ret .= " <input type='submit' value=\"$ML{'sitescheme.accountlinks.btn.logout'}\" />"; - $ret .= "</form>"; - $ret .= "<ul>"; - $ret .= "<li><a href='$LJ::SITEROOT/update'>$ML{'sitescheme.accountlinks.post'}</a> • </li>" unless $identity; - $ret .= "<li><a href='" . $remote->journal_base . "/read'>$ML{'sitescheme.accountlinks.readinglist'}</a> • </li>"; - $ret .= "<li><a href='$LJ::SITEROOT/inbox/'>$ML{'sitescheme.accountlinks.inbox'}"; - $ret .= " <span id='Inbox_Unread_Count'>($unread)</span>" if $unread; - $ret .= "</a> • </li>"; - $ret .= "<li><a href='$LJ::SITEROOT/manage/settings/'>$ML{'sitescheme.accountlinks.account'}</a></li> <br />"; - $ret .= "<li><a href='$LJ::SITEROOT/manage/circle/invite'>$ML{'sitescheme.accountlinks.invitefriend'}</a> • </li>" unless $identity; - $ret .= "<li><a href='$LJ::SITEROOT/support/'>$ML{'sitescheme.accountlinks.help'}</a></li>"; - $ret .= "</ul>"; - $ret .= "</div>"; - } else { - my $chal = LJ::challenge_generate(300); - - $ret .= "<form action='$LJ::SITEROOT/login?ret=1' method='post'>"; - $ret .= LJ::html_hidden( returnto => $GET{returnto} ); - $ret .= "<input type='hidden' name='chal' class='lj_login_chal' value='$chal' />\n"; - $ret .= "<input type='hidden' name='response' class='lj_login_response' value='' />\n"; - $ret .= "<table id='login-table'>"; - $ret .= "<tr><td><label for='login_user'>$ML{'sitescheme.accountlinks.login.username'}</label></td>"; - $ret .= "<td class='input-cell' colspan='2'>" . LJ::html_text({ - name => "user", - id => "login_user", - size => 20, - maxlength => 27, - tabindex => 1, - raw => 'aria-required="true"', - }) . " <a href='$LJ::SITEROOT/openid/' tabindex=5>$ML{'sitescheme.accountlinks.login.openid'}</a></td></tr>"; - $ret .= "<tr><td><label for='login_password'>$ML{'sitescheme.accountlinks.login.password'}</label></td>"; - $ret .= "<td class='input-cell' colspan='2'>" . LJ::html_text({ - type => "password", - name => "password", - id => "login_password", - size => 20, - tabindex => 2, - raw => 'aria-required="true"', - }) . " <a href='$LJ::SITEROOT/lostinfo' tabindex=6>$ML{'sitescheme.accountlinks.login.forgotpassword'}</a></td></tr>"; - $ret .= "<tr><td> </td>"; - $ret .= "<td class='remember-me-cell'>"; - $ret .= LJ::html_check({ - name => "remember_me", - id => "login_remember_me", - value => 1, - tabindex => 3, - }); - $ret .= " <label for='login_remember_me'>$ML{'sitescheme.accountlinks.login.rememberme'}</label></td>"; - $ret .= "<td>" . LJ::html_submit( login => $ML{'sitescheme.accountlinks.btn.login'}, { tabindex => 4 }) . "</td>"; - $ret .= "</tr>"; - $ret .= "</table>"; - $ret .= "</form>"; - } - - return $ret; -} -_code?> -<=accountlinks - -footer<= -<ul> - <li><a href="<?siteroot?>/legal/privacy"><?_ml sitescheme.footer.legal.privacypolicy _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/tos"><?_ml sitescheme.footer.legal.tos _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/diversity"><?_ml sitescheme.footer.legal.diversitystatement _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/principles"><?_ml sitescheme.footer.legal.guidingprinciples _ml?></a> • </li> - <li><a href="<?siteroot?>/site/"><?_ml sitescheme.footer.sitemap _ml?></a> • </li> - <li><a href="<?siteroot?>/site/suggest"><?_ml sitescheme.footer.suggestion _ml?></a></li> -</ul> -<p><?_ml sitescheme.footer.info _ml?></p> -<=footer - page<= {Fps}<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <?head?> <body %%bodyopts%%> <div id="canvas"> - <div id="page"> - <div id="masthead"> - <span id="logo"> - <?logo?> - </span> - </div> - - <div id="content" %%contentopts%%> - <h1>%%title%%</h1> - %%body%% - </div> - <div id="account-links"> - <?accountlinks?> - </div> - <div id="menu"> - <?menunav?> - </div> - <div id="header-search"> - <?_code return LJ::Widget::Search->render; _code?> - </div> - <div id="footer"> - <?footer?> - </div> - </div> + <?pagediv?> </div> <?_code LJ::final_body_html(); _code?> </body> diff -r 207c7ed022f8 -r 9f7af1eaa2e0 cgi-bin/bml/scheme/celerity.look --- a/cgi-bin/bml/scheme/celerity.look Thu Sep 23 17:50:28 2010 +0800 +++ b/cgi-bin/bml/scheme/celerity.look Thu Sep 23 17:53:58 2010 +0800 @@ -14,19 +14,7 @@ # the same terms as Perl itself. For a copy of the license, please reference # 'perldoc perlartistic' or 'perldoc perlgpl'. -_parent=>global.look - -h1=>{D}<h1>%%data%%</h1> -h2=>{D}<h2>%%data%%</h2> -p=>{D}<p>%%data%%</p> -hr=><hr /> - -de=><span style='font-size: smaller;'>%%data%%</span> -emailex=><div style='width: 50%; font-family: courier; background-color: #efefef; border: dotted #cdcdcd 2px; padding: 5px;'>%%data%%</div> - -standout<= -{DRps}<div class='standout'><table class='standout-inner'><tr><td>%%data%%</td></tr></table></div> -<=standout +_parent=>common.look head<= <head> @@ -53,10 +41,6 @@ head<= %%head%% </head> <=head - -logo<= -<span id='sitename'><a href="<?siteroot?>"><?_code $LJ::SITENAMESHORT _code?></a></span> -<=logo accountlinks<= <?_code @@ -133,17 +117,6 @@ _code?> _code?> <=accountlinks -footer<= -<ul> - <li><a href="<?siteroot?>/legal/privacy"><?_ml sitescheme.footer.legal.privacypolicy _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/tos"><?_ml sitescheme.footer.legal.tos _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/diversity"><?_ml sitescheme.footer.legal.diversitystatement _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/principles"><?_ml sitescheme.footer.legal.guidingprinciples _ml?></a> • </li> - <li><a href="<?siteroot?>/site/"><?_ml sitescheme.footer.sitemap _ml?></a></li> -</ul> -<p><?_ml sitescheme.footer.info _ml?></p> -<=footer - userpic<= <?_code { @@ -179,7 +152,7 @@ page<= <?logo?> </div><!-- end masthead--> - <div id="content" %%contentopts%% ?> + <div id="content" %%contentopts%%> <h1>%%title%%</h1> %%body%% </div><!--end content--> diff -r 207c7ed022f8 -r 9f7af1eaa2e0 cgi-bin/bml/scheme/common.look --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/cgi-bin/bml/scheme/common.look Thu Sep 23 17:53:58 2010 +0800 @@ -0,0 +1,159 @@ +# Common BML for all Dreamwidth site schemes, refactored for inheritance. +# +# Authors: +# Jen Griffin <kareila@livejournal.com> +# Based on Blueshift Site Scheme, authored by: +# Emily Ravenwood <ravenwood@alltrees.org> +# Denise Paolucci <denise@dreamwidth.org> +# Which was in turn based on Tropospherical Red, authored by: +# Janine Smith <janine@netrophic.com> +# Jesse Proulx <jproulx@jproulx.net> +# Elizabeth Lubowitz <grrliz@gmail.com> +# +# Copyright (c) 2010 by Dreamwidth Studios, LLC. +# +# This program is free software; you may redistribute it and/or modify it under +# the same terms as Perl itself. For a copy of the license, please reference +# 'perldoc perlartistic' or 'perldoc perlgpl'. + +_parent=>global.look + +h1=>{D}<h1>%%data%%</h1> +h2=>{D}<h2>%%data%%</h2> +p=>{D}<p>%%data%%</p> +hr=><hr /> + +de=><span style='font-size: smaller;'>%%data%%</span> +emailex=><div style='width: 50%; font-family: courier; background-color: #efefef; border: dotted #cdcdcd 2px; padding: 5px;'>%%data%%</div> + +standout<= +{DRps}<div class='standout'><table class='standout-inner'><tr><td>%%data%%</td></tr></table></div> +<=standout + +logo<= +<span id='sitename'><a href="<?siteroot?>"><?_code $LJ::SITENAMESHORT _code?></a></span> +<=logo + +footer<= +<ul> + <li><a href="<?siteroot?>/legal/privacy"><?_ml sitescheme.footer.legal.privacypolicy _ml?></a> • </li> + <li><a href="<?siteroot?>/legal/tos"><?_ml sitescheme.footer.legal.tos _ml?></a> • </li> + <li><a href="<?siteroot?>/legal/diversity"><?_ml sitescheme.footer.legal.diversitystatement _ml?></a> • </li> + <li><a href="<?siteroot?>/legal/principles"><?_ml sitescheme.footer.legal.guidingprinciples _ml?></a> • </li> + <li><a href="<?siteroot?>/site/"><?_ml sitescheme.footer.sitemap _ml?></a> • </li> + <li><a href="<?siteroot?>/site/suggest"><?_ml sitescheme.footer.suggestion _ml?></a></li> +</ul> +<p><?_ml sitescheme.footer.info _ml?></p> +<=footer + +accountlinks<= +<?_code +{ + my $remote = LJ::get_remote(); + my $ret; + + if ( $remote ) { + my $userpic = $remote->userpic; + my $inbox = $remote->notification_inbox; + my $unread = $inbox->unread_count; + my $identity = $remote->is_identity; + + $ret .= "<div id='account-links-userpic'><a href='$LJ::SITEROOT/editicons'>"; + + if ( $userpic && !$LJ::IS_SSL ) { + my $wh = $userpic->img_fixedsize( width => 80, height => 80 ); + $ret .= "<img src='" . $userpic->url . "' $wh alt=\"$ML{'sitescheme.accountlinks.userpic.alt'}\" />"; + } else { + $ret .= LJ::img( "nouserpic_sitescheme", "" ); + } + $ret .= "</a></div>"; + $ret .= "<div id='account-links-text'>"; + $ret .= "<form action='$LJ::SITEROOT/logout?ret=1' method='post'>"; + $ret .= $remote->ljuser_display; + $ret .= "<input type='hidden' name='user' value='" . $remote->user . "' />"; + $ret .= "<input type='hidden' name='sessid' value='$remote->{_session}->{sessid}' />"; + $ret .= " <input type='submit' value=\"$ML{'sitescheme.accountlinks.btn.logout'}\" />"; + $ret .= "</form>"; + $ret .= "<ul>"; + $ret .= "<li><a href='$LJ::SITEROOT/update'>$ML{'sitescheme.accountlinks.post'}</a> • </li>" unless $identity; + $ret .= "<li><a href='" . $remote->journal_base . "/read'>$ML{'sitescheme.accountlinks.readinglist'}</a> • </li>"; + $ret .= "<li><a href='$LJ::SITEROOT/inbox/'>$ML{'sitescheme.accountlinks.inbox'}"; + $ret .= " <span id='Inbox_Unread_Count'>($unread)</span>" if $unread; + $ret .= "</a> • </li>"; + $ret .= "<li><a href='$LJ::SITEROOT/manage/settings/'>$ML{'sitescheme.accountlinks.account'}</a></li> <br />"; + $ret .= "<li><a href='$LJ::SITEROOT/manage/circle/invite'>$ML{'sitescheme.accountlinks.invitefriend'}</a> • </li>" unless $identity; + $ret .= "<li><a href='$LJ::SITEROOT/support/'>$ML{'sitescheme.accountlinks.help'}</a></li>"; + $ret .= "</ul>"; + $ret .= "</div>"; + } else { + my $chal = LJ::challenge_generate(300); + + $ret .= "<form action='$LJ::SITEROOT/login?ret=1' method='post'>"; + $ret .= LJ::html_hidden( returnto => $GET{returnto} ); + $ret .= "<input type='hidden' name='chal' class='lj_login_chal' value='$chal' />\n"; + $ret .= "<input type='hidden' name='response' class='lj_login_response' value='' />\n"; + $ret .= "<table id='login-table'>"; + $ret .= "<tr><td><label for='login_user'>$ML{'sitescheme.accountlinks.login.username'}</label></td>"; + $ret .= "<td class='input-cell' colspan='2'>" . LJ::html_text({ + name => "user", + id => "login_user", + size => 20, + maxlength => 27, + tabindex => 1, + raw => 'aria-required="true"', + }) . " <a href='$LJ::SITEROOT/openid/' tabindex=5>$ML{'sitescheme.accountlinks.login.openid'}</a></td></tr>"; + $ret .= "<tr><td><label for='login_password'>$ML{'sitescheme.accountlinks.login.password'}</label></td>"; + $ret .= "<td class='input-cell' colspan='2'>" . LJ::html_text({ + type => "password", + name => "password", + id => "login_password", + size => 20, + tabindex => 2, + raw => 'aria-required="true"', + }) . " <a href='$LJ::SITEROOT/lostinfo' tabindex=6>$ML{'sitescheme.accountlinks.login.forgotpassword'}</a></td></tr>"; + $ret .= "<tr><td> </td>"; + $ret .= "<td class='remember-me-cell'>"; + $ret .= LJ::html_check({ + name => "remember_me", + id => "login_remember_me", + value => 1, + tabindex => 3, + }); + $ret .= " <label for='login_remember_me'>$ML{'sitescheme.accountlinks.login.rememberme'}</label></td>"; + $ret .= "<td>" . LJ::html_submit( login => $ML{'sitescheme.accountlinks.btn.login'}, { tabindex => 4 }) . "</td>"; + $ret .= "</tr>"; + $ret .= "</table>"; + $ret .= "</form>"; + } + + return $ret; +} +_code?> +<=accountlinks + +pagediv<= + <div id="page"> + <div id="masthead"> + <span id="logo"> + <?logo?> + </span> + </div> + + <div id="content" %%contentopts%%> + <h1>%%title%%</h1> + %%body%% + </div> + <div id="account-links"> + <?accountlinks?> + </div> + <div id="menu"> + <?menunav?> + </div> + <div id="header-search"> + <?_code return LJ::Widget::Search->render; _code?> + </div> + <div id="footer"> + <?footer?> + </div> + </div> +<=pagediv diff -r 207c7ed022f8 -r 9f7af1eaa2e0 cgi-bin/bml/scheme/gradation-horizontal.look --- a/cgi-bin/bml/scheme/gradation-horizontal.look Thu Sep 23 17:50:28 2010 +0800 +++ b/cgi-bin/bml/scheme/gradation-horizontal.look Thu Sep 23 17:53:58 2010 +0800 @@ -14,19 +14,7 @@ # the same terms as Perl itself. For a copy of the license, please reference # 'perldoc perlartistic' or 'perldoc perlgpl'. -_parent=>global.look - -h1=>{D}<h1>%%data%%</h1> -h2=>{D}<h2>%%data%%</h2> -p=>{D}<p>%%data%%</p> -hr=><hr /> - -de=><span style='font-size: smaller;'>%%data%%</span> -emailex=><div style='width: 50%; font-family: courier; background-color: #efefef; border: dotted #cdcdcd 2px; padding: 5px;'>%%data%%</div> - -standout<= -{DRps}<div class='standout'><table class='standout-inner'><tr><td>%%data%%</td></tr></table></div> -<=standout +_parent=>common.look head<= <head> @@ -56,136 +44,13 @@ head<= </head> <=head -logo<= -<span id='sitename'><a href="<?siteroot?>"><?_code $LJ::SITENAMESHORT _code?></a></span> -<=logo - -accountlinks<= -<?_code -{ - my $remote = LJ::get_remote(); - my $ret; - - if ( $remote ) { - my $userpic = $remote->userpic; - my $inbox = $remote->notification_inbox; - my $unread = $inbox->unread_count; - my $identity = $remote->is_identity; - - $ret .= "<div id='account-links-userpic'><a href='$LJ::SITEROOT/editicons'>"; - if ( $userpic ) { - my $wh = $userpic->img_fixedsize( width => 80, height => 80 ); - $ret .= "<img src='" . $userpic->url . "' $wh alt=\"$ML{'sitescheme.accountlinks.userpic.alt'}\" />"; - } else { - $ret .= LJ::img( "nouserpic_sitescheme", "" ); - } - $ret .= "</a></div>"; - $ret .= "<div id='account-links-text'>"; - $ret .= "<form action='$LJ::SITEROOT/logout?ret=1' method='post'>"; - $ret .= $remote->ljuser_display; - $ret .= "<input type='hidden' name='user' value='" . $remote->user . "' />"; - $ret .= "<input type='hidden' name='sessid' value='$remote->{_session}->{sessid}' />"; - $ret .= " <input type='submit' value=\"$ML{'sitescheme.accountlinks.btn.logout'}\" />"; - $ret .= "</form>"; - $ret .= "<ul>"; - $ret .= "<li><a href='$LJ::SITEROOT/update'>$ML{'sitescheme.accountlinks.post'}</a> • </li>" unless $identity; - $ret .= "<li><a href='" . $remote->journal_base . "/read'>$ML{'sitescheme.accountlinks.readinglist'}</a> • </li>"; - $ret .= "<li><a href='$LJ::SITEROOT/inbox/'>$ML{'sitescheme.accountlinks.inbox'}"; - $ret .= " <span id='Inbox_Unread_Count'>($unread)</span>" if $unread; - $ret .= "</a> • </li>"; - $ret .= "<li><a href='$LJ::SITEROOT/manage/settings/'>$ML{'sitescheme.accountlinks.account'}</a></li> <br />"; - $ret .= "<li><a href='$LJ::SITEROOT/manage/circle/invite'>$ML{'sitescheme.accountlinks.invitefriend'}</a> • </li>" unless $identity; - $ret .= "<li><a href='$LJ::SITEROOT/support/'>$ML{'sitescheme.accountlinks.help'}</a></li>"; - $ret .= "</ul>"; - $ret .= "</div>"; - } else { - my $chal = LJ::challenge_generate(300); - - $ret .= "<form action='$LJ::SITEROOT/login?ret=1' method='post'>"; - $ret .= LJ::html_hidden( returnto => $GET{returnto} ); - $ret .= "<input type='hidden' name='chal' class='lj_login_chal' value='$chal' />\n"; - $ret .= "<input type='hidden' name='response' class='lj_login_response' value='' />\n"; - $ret .= "<table id='login-table'>"; - $ret .= "<tr><td><label for='login_user'>$ML{'sitescheme.accountlinks.login.username'}</label></td>"; - $ret .= "<td class='input-cell' colspan='2'>" . LJ::html_text({ - name => "user", - id => "login_user", - size => 20, - maxlength => 27, - tabindex => 1, - raw => 'aria-required="true"', - }) . " <a href='$LJ::SITEROOT/openid/' tabindex=5>$ML{'sitescheme.accountlinks.login.openid'}</a></td></tr>"; - $ret .= "<tr><td><label for='login_password'>$ML{'sitescheme.accountlinks.login.password'}</label></td>"; - $ret .= "<td class='input-cell' colspan='2'>" . LJ::html_text({ - type => "password", - name => "password", - id => "login_password", - size => 20, - tabindex => 2, - raw => 'aria-required="true"', - }) . " <a href='$LJ::SITEROOT/lostinfo' tabindex=6>$ML{'sitescheme.accountlinks.login.forgotpassword'}</a></td></tr>"; - $ret .= "<tr><td> </td>"; - $ret .= "<td class='remember-me-cell'>"; - $ret .= LJ::html_check({ - name => "remember_me", - id => "login_remember_me", - value => 1, - tabindex => 3, - }); - $ret .= " <label for='login_remember_me'>$ML{'sitescheme.accountlinks.login.rememberme'}</label></td>"; - $ret .= "<td>" . LJ::html_submit( login => $ML{'sitescheme.accountlinks.btn.login'}, { tabindex => 4 }) . "</td>"; - $ret .= "</tr>"; - $ret .= "</table>"; - $ret .= "</form>"; - } - - return $ret; -} -_code?> -<=accountlinks - -footer<= -<ul> - <li><a href="<?siteroot?>/legal/privacy"><?_ml sitescheme.footer.legal.privacypolicy _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/tos"><?_ml sitescheme.footer.legal.tos _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/diversity"><?_ml sitescheme.footer.legal.diversitystatement _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/principles"><?_ml sitescheme.footer.legal.guidingprinciples _ml?></a> • </li> - <li><a href="<?siteroot?>/site/"><?_ml sitescheme.footer.sitemap _ml?></a> • </li> - <li><a href="<?siteroot?>/site/suggest"><?_ml sitescheme.footer.suggestion _ml?></a></li> -</ul> -<p><?_ml sitescheme.footer.info _ml?></p> -<=footer - page<= {Fps}<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <?head?> <body %%bodyopts%%> <div id="canvas" class="horizontal-nav"> - <div id="page"> - <div id="masthead"> - <span id="logo"> - <?logo?> - </span> - </div> - - <div id="content" %%contentopts%%> - <h1>%%title%%</h1> - %%body%% - </div> - <div id="account-links"> - <?accountlinks?> - </div> - <div id="menu"> - <?menunav?> - </div> - <div id="header-search"> - <?_code return LJ::Widget::Search->render; _code?> - </div> - <div id="footer"> - <?footer?> - </div> - </div> + <?pagediv?> </div> <?_code LJ::final_body_html(); _code?> </body> diff -r 207c7ed022f8 -r 9f7af1eaa2e0 cgi-bin/bml/scheme/gradation-vertical.look --- a/cgi-bin/bml/scheme/gradation-vertical.look Thu Sep 23 17:50:28 2010 +0800 +++ b/cgi-bin/bml/scheme/gradation-vertical.look Thu Sep 23 17:53:58 2010 +0800 @@ -14,19 +14,7 @@ # the same terms as Perl itself. For a copy of the license, please reference # 'perldoc perlartistic' or 'perldoc perlgpl'. -_parent=>global.look - -h1=>{D}<h1>%%data%%</h1> -h2=>{D}<h2>%%data%%</h2> -p=>{D}<p>%%data%%</p> -hr=><hr /> - -de=><span style='font-size: smaller;'>%%data%%</span> -emailex=><div style='width: 50%; font-family: courier; background-color: #efefef; border: dotted #cdcdcd 2px; padding: 5px;'>%%data%%</div> - -standout<= -{DRps}<div class='standout'><table class='standout-inner'><tr><td>%%data%%</td></tr></table></div> -<=standout +_parent=>common.look head<= <head> @@ -54,136 +42,13 @@ head<= </head> <=head -logo<= -<span id='sitename'><a href="<?siteroot?>"><?_code $LJ::SITENAMESHORT _code?></a></span> -<=logo - -accountlinks<= -<?_code -{ - my $remote = LJ::get_remote(); - my $ret; - - if ( $remote ) { - my $userpic = $remote->userpic; - my $inbox = $remote->notification_inbox; - my $unread = $inbox->unread_count; - my $identity = $remote->is_identity; - - $ret .= "<div id='account-links-userpic'><a href='$LJ::SITEROOT/editicons'>"; - if ( $userpic ) { - my $wh = $userpic->img_fixedsize( width => 80, height => 80 ); - $ret .= "<img src='" . $userpic->url . "' $wh alt=\"$ML{'sitescheme.accountlinks.userpic.alt'}\" />"; - } else { - $ret .= LJ::img( "nouserpic_sitescheme", "" ); - } - $ret .= "</a></div>"; - $ret .= "<div id='account-links-text'>"; - $ret .= "<form action='$LJ::SITEROOT/logout?ret=1' method='post'>"; - $ret .= $remote->ljuser_display; - $ret .= "<input type='hidden' name='user' value='" . $remote->user . "' />"; - $ret .= "<input type='hidden' name='sessid' value='$remote->{_session}->{sessid}' />"; - $ret .= " <input type='submit' value=\"$ML{'sitescheme.accountlinks.btn.logout'}\" />"; - $ret .= "</form>"; - $ret .= "<ul>"; - $ret .= "<li><a href='$LJ::SITEROOT/update'>$ML{'sitescheme.accountlinks.post'}</a> • </li>" unless $identity; - $ret .= "<li><a href='" . $remote->journal_base . "/read'>$ML{'sitescheme.accountlinks.readinglist'}</a> • </li>"; - $ret .= "<li><a href='$LJ::SITEROOT/inbox/'>$ML{'sitescheme.accountlinks.inbox'}"; - $ret .= " <span id='Inbox_Unread_Count'>($unread)</span>" if $unread; - $ret .= "</a> • </li>"; - $ret .= "<li><a href='$LJ::SITEROOT/manage/settings/'>$ML{'sitescheme.accountlinks.account'}</a></li> <br />"; - $ret .= "<li><a href='$LJ::SITEROOT/manage/circle/invite'>$ML{'sitescheme.accountlinks.invitefriend'}</a> • </li>" unless $identity; - $ret .= "<li><a href='$LJ::SITEROOT/support/'>$ML{'sitescheme.accountlinks.help'}</a></li>"; - $ret .= "</ul>"; - $ret .= "</div>"; - } else { - my $chal = LJ::challenge_generate(300); - - $ret .= "<form action='$LJ::SITEROOT/login?ret=1' method='post'>"; - $ret .= LJ::html_hidden( returnto => $GET{returnto} ); - $ret .= "<input type='hidden' name='chal' class='lj_login_chal' value='$chal' />\n"; - $ret .= "<input type='hidden' name='response' class='lj_login_response' value='' />\n"; - $ret .= "<table id='login-table'>"; - $ret .= "<tr><td><label for='login_user'>$ML{'sitescheme.accountlinks.login.username'}</label></td>"; - $ret .= "<td class='input-cell' colspan='2'>" . LJ::html_text({ - name => "user", - id => "login_user", - size => 20, - maxlength => 27, - tabindex => 1, - raw => 'aria-required="true"', - }) . " <a href='$LJ::SITEROOT/openid/' tabindex=5>$ML{'sitescheme.accountlinks.login.openid'}</a></td></tr>"; - $ret .= "<tr><td><label for='login_password'>$ML{'sitescheme.accountlinks.login.password'}</label></td>"; - $ret .= "<td class='input-cell' colspan='2'>" . LJ::html_text({ - type => "password", - name => "password", - id => "login_password", - size => 20, - tabindex => 2, - raw => 'aria-required="true"', - }) . " <a href='$LJ::SITEROOT/lostinfo' tabindex=6>$ML{'sitescheme.accountlinks.login.forgotpassword'}</a></td></tr>"; - $ret .= "<tr><td> </td>"; - $ret .= "<td class='remember-me-cell'>"; - $ret .= LJ::html_check({ - name => "remember_me", - id => "login_remember_me", - value => 1, - tabindex => 3, - }); - $ret .= " <label for='login_remember_me'>$ML{'sitescheme.accountlinks.login.rememberme'}</label></td>"; - $ret .= "<td>" . LJ::html_submit( login => $ML{'sitescheme.accountlinks.btn.login'}, { tabindex => 4 }) . "</td>"; - $ret .= "</tr>"; - $ret .= "</table>"; - $ret .= "</form>"; - } - - return $ret; -} -_code?> -<=accountlinks - -footer<= -<ul> - <li><a href="<?siteroot?>/legal/privacy"><?_ml sitescheme.footer.legal.privacypolicy _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/tos"><?_ml sitescheme.footer.legal.tos _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/diversity"><?_ml sitescheme.footer.legal.diversitystatement _ml?></a> • </li> - <li><a href="<?siteroot?>/legal/principles"><?_ml sitescheme.footer.legal.guidingprinciples _ml?></a> • </li> - <li><a href="<?siteroot?>/site/"><?_ml sitescheme.footer.sitemap _ml?></a> • </li> - <li><a href="<?siteroot?>/site/suggest"><?_ml sitescheme.footer.suggestion _ml?></a></li> -</ul> -<p><?_ml sitescheme.footer.info _ml?></p> -<=footer - page<= {Fps}<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <?head?> <body %%bodyopts%%> <div id="canvas" class="vertical-nav"> - <div id="page"> - <div id="masthead"> - <span id="logo"> - <?logo?> - </span> - </div> - - <div id="content" %%contentopts%%> - <h1>%%title%%</h1> - %%body%% - </div> - <div id="account-links"> - <?accountlinks?> - </div> - <div id="menu"> - <?menunav?> - </div> - <div id="header-search"> - <?_code return LJ::Widget::Search->render; _code?> - </div> - <div id="footer"> - <?footer?> - </div> - </div> + <?pagediv?> </div> <?_code LJ::final_body_html(); _code?> </body> --------------------------------------------------------------------------------