init
This commit is contained in:
32
local/cgi-bin/bml/scheme/added.variables
Executable file
32
local/cgi-bin/bml/scheme/added.variables
Executable file
@@ -0,0 +1,32 @@
|
||||
ljrlook.nav.create
|
||||
ljrlook.nav.update
|
||||
ljrlook.nav.fullupdate
|
||||
ljrlook.nav.site
|
||||
ljrlook.nav.news
|
||||
ljrlook.nav.paidaccounts
|
||||
ljrlook.nav.edit
|
||||
ljrlook.nav.modify
|
||||
ljrlook.nav.editinfo
|
||||
ljrlook.nav.editfriends
|
||||
ljrlook.nav.editjournal
|
||||
ljrlook.nav.editpics
|
||||
ljrlook.nav.changepassword
|
||||
ljrlook.nav.communities.manage
|
||||
ljrlook.nav.frills
|
||||
ljrlook.nav.customize
|
||||
ljrlook.nav.createstyle
|
||||
ljrlook.nav.editstyle
|
||||
ljrlook.nav.needhelp
|
||||
ljrlook.nav.lostinfo
|
||||
ljrlook.nav.support.faq
|
||||
ljrlook.nav.support
|
||||
|
||||
ljrlook.nav.hello
|
||||
ljrlook.nav.yourjournal
|
||||
ljrlook.nav.recent
|
||||
ljrlook.nav.calendar
|
||||
ljrlook.nav.friends
|
||||
ljrlook.nav.userinfo
|
||||
ljrlook.nav.memories
|
||||
ljrlook.nav.logout
|
||||
ljrlook.nav.login
|
||||
267
local/cgi-bin/bml/scheme/bluewhite.look
Executable file
267
local/cgi-bin/bml/scheme/bluewhite.look
Executable file
@@ -0,0 +1,267 @@
|
||||
#
|
||||
# Welcome to GENERIC.LOOK for the WhiteBlue scheme
|
||||
#
|
||||
# by....
|
||||
# Brad Fitzpatrick
|
||||
# brad@danga.com
|
||||
#
|
||||
|
||||
######################### little stuff
|
||||
|
||||
_parent=>global.look
|
||||
|
||||
AL=>{P}<I><A HREF="%%DATA1%%">%%DATA2%%</A></I> <IMG SRC="/img/external_link.gif" WIDTH=16 HEIGHT=11 ALIGN=ABSMIDDLE>
|
||||
AWAYLINK=>{P}<I><A HREF="%%DATA1%%">%%DATA2%%</A></I> <IMG SRC="/img/external_link.gif" WIDTH=16 HEIGHT=11 ALIGN=ABSMIDDLE>
|
||||
|
||||
H1=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
H1/FOLLOW_CHOICES=>{D}<FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
HEAD1=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
|
||||
H2=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
HEAD2=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
|
||||
# Banner Header: search results banner, content desriptor, etc...
|
||||
BH=>{D}<P ALIGN=CENTER><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
|
||||
GRIN=><grin>
|
||||
HR=><P ALIGN="CENTER"><FONT COLOR=BLUE>*</FONT></P>
|
||||
|
||||
NEWLINE=>{D}<BR>
|
||||
P=>{D}<BR>%%DATA%%
|
||||
P/FOLLOW_P=>{D}<BR><IMG SRC="/img/dot.gif" WIDTH=1 VSPACE=6 HEIGHT=1><BR>%%DATA%%
|
||||
|
||||
STANDOUTO<=
|
||||
{D}<CENTER><FONT SIZE=1><BR></FONT><TABLE ALIGN=CENTER CELLPADDING=8 BORDER=1 BGCOLOR=#CCCCFF BORDERCOLORLIGHT=#DDDDFF
|
||||
BORDERCOLORDARK=#BBBBFF><TR><TD VALIGN=CENTER>
|
||||
%%DATA%%
|
||||
|
||||
</TD></TR></TABLE></CENTER>
|
||||
<=STANDOUTO
|
||||
|
||||
STANDOUT<=
|
||||
{D}<CENTER><FONT SIZE=1><BR></FONT>
|
||||
<table cellspacing=0 cellpadding=0 border=0 bgcolor="#ccccff">
|
||||
<tr>
|
||||
<td width=7 align=left valign=top>
|
||||
<img width=7 height=7 src="/img/corn_nw.gif" alt=""></td>
|
||||
<td height=7>
|
||||
<img height=7 src="/img/dot.gif" alt=""></td>
|
||||
<td width=7 valign=top align=right>
|
||||
<img height=7 src="/img/corn_ne.gif" alt=""></td>
|
||||
</tr><tr>
|
||||
<td width=7>
|
||||
<img width=7 height=1 src="/img/dot.gif" alt=""></td>
|
||||
<td valign=top>
|
||||
%%DATA%%
|
||||
|
||||
</td>
|
||||
<td width=7>
|
||||
<img width=7 height=1 src="/img/dot.gif" alt=""></td>
|
||||
</tr><tr>
|
||||
<td width=7 align=left valign=top>
|
||||
<img width=7 height=7 src="/img/corn_sw.gif" alt=""></td>
|
||||
<td height=7>
|
||||
<img height=7 src="/img/dot.gif" alt=""></td>
|
||||
<td width=7 valign=top align=right>
|
||||
<img height=7 src="/img/corn_se.gif" alt=""></td>
|
||||
</tr>
|
||||
</table>
|
||||
|
||||
</CENTER>
|
||||
<=STANDOUT
|
||||
SOERROR=><div style='background-color:#f3f4fe; color:red; font-weight:bold; text-align:center'>%%data%%</div>
|
||||
EMAILEX=><div style='width: 50%; font-family: courier; background-color: #efefef; border: dotted #cdcdcd 2px; padding: 5px;'>%%data%%</div>
|
||||
|
||||
######################### choices stuff
|
||||
|
||||
CHOICE=>{P}<DT><A HREF="%%DATA2%%"><FONT FACE="Arial,Helvetica"><B>%%DATA1%%</B></FONT></A><DD><FONT SIZE="2">%%DATA3%%</FONT>
|
||||
|
||||
CHOICES<=
|
||||
{F}<P><DIV CLASS="choice"><TABLE WIDTH="100%" CELLPADDING="2" CELLSPACING="5">
|
||||
<TR>
|
||||
<TD VALIGN=TOP WIDTH="50%">
|
||||
<DL>
|
||||
%%ITEMS%%
|
||||
</DL>
|
||||
</TD>
|
||||
<TD VALIGN=TOP WIDTH="50%">
|
||||
<DL>
|
||||
%%ITEMSB%%
|
||||
</DL>
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE></DIV>
|
||||
<=CHOICES
|
||||
|
||||
##################################################################################
|
||||
################################### MAIN PAGE ####################################
|
||||
##################################################################################
|
||||
|
||||
PAGE<=
|
||||
{Fps}<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">
|
||||
<HTML><?load_page_info?>
|
||||
<HEAD>
|
||||
<title><?_code {
|
||||
my $elhash = $_[2];
|
||||
return $elhash->{'WINDOWTITLE'} || $elhash->{'TITLE'};
|
||||
} _code?></title>
|
||||
%%head%%
|
||||
<?_code
|
||||
use strict;
|
||||
my $crumb_up;
|
||||
if(LJ::get_active_crumb() ne '')
|
||||
{
|
||||
my $parentcrumb = LJ::get_parent_crumb();
|
||||
$crumb_up = "<link rel='up' title='$parentcrumb->[0]' href='$parentcrumb->[1]' />";
|
||||
}
|
||||
return $crumb_up;
|
||||
_code?>
|
||||
</HEAD>
|
||||
|
||||
<BODY BGCOLOR=#FFFFFF TOPMARGIN="0" LEFTMARGIN="0" MARGINHEIGHT="0" MARGINWIDTH="0" LINK=#0000C0 VLINK=#600060 %%bodyopts%%>
|
||||
|
||||
<TABLE WIDTH=100% BORDER=0 CELLPADDING=0 CELLSPACING=0 BACKGROUND="/img/bluewhite/bluefade.jpg">
|
||||
<TR WIDTH=100%>
|
||||
<TD VALIGN=BOTTOM ALIGN=LEFT HEIGHT=100>
|
||||
|
||||
<TABLE BACKGROUND="" HEIGHT=95 WIDTH=100% BORDER=0>
|
||||
<TR>
|
||||
<TD WIDTH=3> </TD>
|
||||
<TD HEIGHT=53 WIDTH=406 VALIGN=BOTTOM>
|
||||
<?_code
|
||||
$is_home = (BML::get_uri() =~ m!^/(index\.bml)?!);
|
||||
if (0 && $is_home)
|
||||
{
|
||||
return '<IMG SRC="/img/bluewhite/title.gif" WIDTH=600 HEIGHT=53><!-- ';
|
||||
}
|
||||
return "";
|
||||
_code?>
|
||||
|
||||
<FONT SIZE=6 COLOR="#000a3f" FACE="Arial, Helvetica"><B>%%TITLE%%</B></FONT>
|
||||
|
||||
<?_code
|
||||
if (0 && $is_home)
|
||||
{
|
||||
return ' -->';
|
||||
}
|
||||
return "";
|
||||
_code?>
|
||||
|
||||
</TD>
|
||||
<TD VALIGN=TOP ALIGN=RIGHT>
|
||||
<?_code
|
||||
unless ($is_home) {
|
||||
return "<A HREF=\"/\"><IMG SRC=\"/img/bluewhite/home.gif\" WIDTH=35 HEIGHT=36 BORDER=0></A> ";
|
||||
}
|
||||
return "";
|
||||
_code?>
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
|
||||
</TD></TR>
|
||||
<TR><TD bgcolor="#FFFFFF"><?breadcrumbs?></TD></TR>
|
||||
</TABLE>
|
||||
|
||||
<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>
|
||||
<TR VALIGN=TOP>
|
||||
<TD WIDTH=155 BGCOLOR=#d7d9e8 NOWRAP><IMG SRC="/img/bluewhite/hline.gif" WIDTH=155 HEIGHT=25 ALT="">
|
||||
|
||||
<TABLE WIDTH=153 BORDER=0 CELLSPACING=0 CELLPADDING=0>
|
||||
<TR><TD>
|
||||
|
||||
<FONT FACE="Arial,Helvetica" SIZE=-1>
|
||||
<?_code
|
||||
|
||||
$ret = "";
|
||||
|
||||
sub dump_entry
|
||||
{
|
||||
my ($ret, $listref, $depth) = @_;
|
||||
|
||||
foreach my $mi (@$listref)
|
||||
{
|
||||
if ($depth==0) {
|
||||
$$ret .= "<P><IMG SRC=\"/img/bluewhite/bullet.gif\" WIDTH=10 HEIGHT=10 HSPACE=2 ALIGN=ABSMIDDLE>";
|
||||
} else {
|
||||
$$ret .= " " x ($depth*3+1);
|
||||
$$ret .= $mi->{'cont'} ? " " : "- ";
|
||||
}
|
||||
|
||||
my $name = $mi->{'name'};
|
||||
$name =~ s/ / /g;
|
||||
if (! defined $mi->{'uri'}) {
|
||||
if ($depth == 0) {
|
||||
$$ret .= "<B>$name</B><BR>";
|
||||
} else {
|
||||
$$ret .= "$name<BR>";
|
||||
}
|
||||
} elsif ($mi->{'match'} ?
|
||||
(BML::get_uri() =~ /$mi->{'match'}/) :
|
||||
(BML::get_uri() eq $mi->{'uri'})
|
||||
){
|
||||
$$ret .= "<B><SPAN style=\"background-color: #FFFFFF\"><FONT COLOR=#0000D0>$name</FONT></SPAN></B><BR>";
|
||||
} else {
|
||||
$$ret .= "<A HREF=\"$mi->{'uri'}\">$name</A><BR>";
|
||||
}
|
||||
|
||||
if ($mi->{'children'} &&
|
||||
($mi->{'recursematch'} ? BML::get_uri() =~ /$mi->{'recursematch'}/ : 1)) {
|
||||
&dump_entry($ret, $mi->{'children'}, $depth+1);
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
&dump_entry(\$ret, \@sidebar, 0);
|
||||
|
||||
return $ret;
|
||||
|
||||
_code?>
|
||||
</FONT>
|
||||
|
||||
</TD></TR></TABLE>
|
||||
</TD>
|
||||
<TD ALIGN=LEFT BACKGROUND="/img/bluewhite/vline.gif" WIDTH=25 NOWRAP>
|
||||
<IMG SRC="/img/bluewhite/linetop.gif" WIDTH=25 HEIGHT=25 ALT=""><BR>
|
||||
<IMG SRC="/img/bluewhite/vline.gif" WIDTH=25 HEIGHT=800 ALT="">
|
||||
</TD>
|
||||
<TD>
|
||||
|
||||
<IMG SRC="/img/dot.gif" WIDTH=1 HEIGHT=3><BR>
|
||||
%%BODY%%
|
||||
|
||||
</TD>
|
||||
<TD WIDTH=20> </TD>
|
||||
</TR>
|
||||
|
||||
<!-- table closure row -->
|
||||
<TR>
|
||||
<TD WIDTH=155 NOWRAP><IMG SRC="/img/bluewhite/sidebarfade.gif" WIDTH=155 HEIGHT=25 ALT=""></TD>
|
||||
<TD WIDTH=25 NOWRAP><IMG SRC="/img/bluewhite/sidebarfade_line.gif" WIDTH=25 HEIGHT=25 ALT=""></TD></TD>
|
||||
<TD>
|
||||
|
||||
</TD>
|
||||
<TD WIDTH=20> </TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
<!-- /table closure row -->
|
||||
|
||||
<!--<TABLE WIDTH=100%>
|
||||
<TR>
|
||||
<TD ALIGN=RIGHT>
|
||||
<FONT FACE="Arial, Helvetica" SIZE="-2">
|
||||
<A HREF="/privacy.bml">Privacy Policy</A> -
|
||||
<A HREF="/coppa.bml">COPPA</A><BR>
|
||||
<A HREF="/disclaimer.bml">Legal Disclaimer</A> -
|
||||
<A HREF="/sitemap.bml">Site Map</A><BR>
|
||||
</FONT>
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
-->
|
||||
|
||||
</BODY>
|
||||
</HTML>
|
||||
<=PAGE
|
||||
|
||||
622
local/cgi-bin/bml/scheme/dystopia.look
Executable file
622
local/cgi-bin/bml/scheme/dystopia.look
Executable file
@@ -0,0 +1,622 @@
|
||||
# LiveJournal.com-specific library
|
||||
#
|
||||
# This file is NOT licensed under the GPL. As with everything in the
|
||||
# "ljcom" CVS repository, this file is the property of Danga
|
||||
# Interactive and is made available to the public only as a reference
|
||||
# as to the best way to modify/extend the base LiveJournal server code
|
||||
# (which is licensed under the GPL).
|
||||
#
|
||||
# Feel free to read and learn from things in "ljcom", but don't use
|
||||
# our schemes because we don't want your site looking like
|
||||
# LiveJournal.com (our logo and site scheme are our identity and we
|
||||
# don't want to confuse users)
|
||||
#
|
||||
# Instead, use/modify one of the schemes in the "livejournal" repository.
|
||||
# (Ideally you'd make your own entirely)
|
||||
#
|
||||
|
||||
_parent=>global.look
|
||||
|
||||
help=>{Ds}<a href="%%data%%"><img src="<?imgprefix?>/help.gif" alt="(<?_ml Help _ml?>)" title="(<?_ml Help _ml?>)" width='14' height='14' hspace='2' align='absmiddle' border='0'></a>
|
||||
|
||||
h1=>{D}<p><span class="heading">%%data%%</span>
|
||||
h1/follow_choices=>{D}<span class="heading">%%data%%</span>
|
||||
|
||||
h2=>{D}<p><span class="heading2">%%data%%</span>
|
||||
|
||||
# Banner Header: search results banner, content desriptor, etc...
|
||||
bh=>{D}<p align="center"><font face="Arial,Helvetica" color="#cc0000" size="-1"><b>%%data%%</b></font>
|
||||
|
||||
grin=>{S}<grin>
|
||||
hr=>{S}<p align="center"><font color=#660066>*</font></p>
|
||||
|
||||
newline=>{S}<br />
|
||||
p=>{DRp}<br />%%data%%
|
||||
p/follow_p=>{DRps}<br /><img src="<?imgprefix?>/dot.gif" width="1" vspace="6" height="1"><br />%%data%%
|
||||
|
||||
emcolor=>{S}#a7c7e8
|
||||
emcolorlite=>{S}#d9e9f9
|
||||
altcolor1=>{S}#d9e9f9
|
||||
altcolor2=>{S}#a7c7e8
|
||||
|
||||
de=>{DRp}<span style="color:#909090;">%%data%%</span>
|
||||
|
||||
standout<=
|
||||
{DRps}<center><font size="1"><br /></font>
|
||||
<table cellspacing="0" cellpadding="0" border="0" bgcolor="<?emcolor?>">
|
||||
<tr align="left">
|
||||
<td width="7" align="left" valign="top">
|
||||
<img width="7" height="7" src="<?imgprefix?>/dys/corn_nw.gif" alt="/"></td>
|
||||
<td height="7">
|
||||
<img height="7" src="<?imgprefix?>/dot.gif" alt=""></td>
|
||||
<td width="7" valign="top" align="right">
|
||||
<img height="7" src="<?imgprefix?>/dys/corn_ne.gif" alt="\"></td>
|
||||
</tr><tr align="left">
|
||||
<td width="7">
|
||||
<img width="7" height="1" src="<?imgprefix?>/dot.gif" alt=""></td>
|
||||
<td valign="top">
|
||||
%%data%%
|
||||
|
||||
</td>
|
||||
<td width="7">
|
||||
<img width="7" height="1" src="<?imgprefix?>/dot.gif" alt=""></td>
|
||||
</tr><tr>
|
||||
<td width="7" align=left valign=top>
|
||||
<img width="7" height="7" src="<?imgprefix?>/dys/corn_sw.gif" alt="\"></td>
|
||||
<td height="7">
|
||||
<img height="7" src="<?imgprefix?>/dot.gif" alt=""></td>
|
||||
<td width="7" valign=top align=right>
|
||||
<img height="7" src="<?imgprefix?>/dys/corn_se.gif" alt="/"></td>
|
||||
</tr>
|
||||
</table>
|
||||
|
||||
</center>
|
||||
<=standout
|
||||
|
||||
warningbar<=
|
||||
{DRps}<div class="warningbar" style="background-image: URL('<?imgprefix?>/message-warning.gif');">
|
||||
%%data%%
|
||||
</div>
|
||||
<=warningbar
|
||||
|
||||
errorbar<=
|
||||
{DRps}<div class="errorbar" style="background-image: URL('<?imgprefix?>/message-error.gif');">
|
||||
%%data%%
|
||||
</div>
|
||||
<=errorbar
|
||||
|
||||
soerror=><div style='background-color:#d0eef9; color:red; font-weight:bold; text-align:center'>%%data%%</div>
|
||||
emailex=><div style='width: 50%; font-family: courier; background-color: #efefef; border: dotted #cdcdcd 2px; padding: 5px;'>%%data%%</div>
|
||||
|
||||
######################### choices stuff
|
||||
|
||||
choice=>{PRps}<dt><img src="<?imgprefix?>/dys/b_purp.gif" align="absmiddle" width="8" height="8"> <a href="%%data2%%"><font face="Arial,Helvetica"><b>%%data1%%</b></font></a><dd><font size="2">%%data3%%</font>
|
||||
|
||||
choices<=
|
||||
{FRp}<p><div class="choice"><table width="100%" cellpadding="2" cellspacing="5">
|
||||
<tr>
|
||||
<td valign="top" width="50%">
|
||||
<dl>
|
||||
%%items%%
|
||||
</dl>
|
||||
</td>
|
||||
<td valign="top" width="50%">
|
||||
<dl>
|
||||
%%itemsb%%
|
||||
</dl>
|
||||
</td>
|
||||
</tr>
|
||||
</table></div>
|
||||
<=choices
|
||||
|
||||
ENTRYFORMCSS<=
|
||||
{Ss}
|
||||
<style type="text/css">
|
||||
#EntryForm #MetaInfo {
|
||||
width: 100%;
|
||||
}
|
||||
#EntryForm th {
|
||||
font-size: .85em;
|
||||
}
|
||||
#EntryForm #SubmitBar {
|
||||
background-color: #dfdfdf;
|
||||
padding: 5px;
|
||||
text-align: center;
|
||||
border: 1px outset #000;
|
||||
margin-left: auto; margin-right: auto;
|
||||
}
|
||||
#MetaInfo tr {
|
||||
padding-bottom: 10px;
|
||||
}
|
||||
#metainfo th {
|
||||
text-align: left;
|
||||
}
|
||||
#mood_preview {
|
||||
display: none;
|
||||
}
|
||||
#datetime_box input, #datetime_box select {
|
||||
margin-right: 2px;
|
||||
}
|
||||
#EntryForm legend {
|
||||
font-weight: bold;
|
||||
}
|
||||
#EntryForm #Options {
|
||||
margin-left: 0; margin-right: 0; padding: 0;
|
||||
background-color: #dfdfdf;
|
||||
border: 1px outset #000;
|
||||
}
|
||||
#EntryForm #Options th {
|
||||
text-align: left;
|
||||
}
|
||||
#EntryForm #infobox {
|
||||
text-align: center;
|
||||
}
|
||||
#EntryForm #infobox table {
|
||||
background-color: #dfdfdf;
|
||||
border: 2px solid <?emcolor?>;
|
||||
}
|
||||
#EntryForm textarea {
|
||||
border: 1px inset #000;
|
||||
padding: 2px;
|
||||
}
|
||||
#EntryForm #Security option {
|
||||
padding-left: 18px;
|
||||
}
|
||||
#EntryForm #security_public {
|
||||
background-image: url("<?imgprefix?>/userinfo.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #security_private {
|
||||
background-image: url("<?imgprefix?>/icon_private.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #security_friends, #EntryForm #security_custom {
|
||||
background-image: url("<?imgprefix?>/icon_protected.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #UserpicPreviewImage {
|
||||
border: 1px solid #000;
|
||||
}
|
||||
#EntryForm {
|
||||
width: 100%;
|
||||
}
|
||||
</style>
|
||||
<=ENTRYFORMCSS
|
||||
|
||||
##################################################################################
|
||||
################################### MAIN PAGE ####################################
|
||||
##################################################################################
|
||||
|
||||
PAGE<=
|
||||
{Fps}<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">
|
||||
<html>
|
||||
<?_code
|
||||
{
|
||||
my $remote = LJ::get_remote(); # will be requested later and returned from cache
|
||||
return LJ::LJcom::expresslane_html_comment($remote, $_[0]->{r});
|
||||
}
|
||||
_code?>
|
||||
<head>
|
||||
<link rel="SHORTCUT ICON" href="<?siteroot?>/favicon.ico">
|
||||
<link rel="home" title="Home" href="/" />
|
||||
<link rel="contents" title="Site Map" href="/site/" />
|
||||
<link rel="help" title="Technical Support" href="/support/" />
|
||||
<title><?_code {
|
||||
my $elhash = $_[2];
|
||||
return $elhash->{'WINDOWTITLE'} || $elhash->{'TITLE'};
|
||||
} _code?></title>
|
||||
<?metactype?>
|
||||
<style type="text/css">
|
||||
<!--
|
||||
p, td { font-size: 12px; font-family: Verdana, Arial, Helvetica, sans-serif; }
|
||||
li { font-size: 12px; font-family: Verdana, Arial, Helvetica, sans-serif; }
|
||||
body { font-size: 12px; font-family: Verdana, Arial, Helvetica, sans-serif; margin: 0px; }
|
||||
.navtext { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #FF9900; font-weight: bold}
|
||||
.navlinks { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #FFFFFF; text-decoration: underline}
|
||||
a:link { font-family: Verdana, Arial, Helvetica, sans-serif; color: #000066; }
|
||||
a:visited { font-family: Verdana, Arial, Helvetica, sans-serif; color: #000066; }
|
||||
a:active { font-family: Verdana, Arial, Helvetica, sans-serif; color: #006699; }
|
||||
.wtext { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; font-weight: bold; color: #FFFFFF}
|
||||
.login { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px}
|
||||
.wtextunbld { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #FFFFFF }
|
||||
.copy { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 11px; color: #000000}
|
||||
.heading { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 13px; color: #660066; font-weight: bold}
|
||||
.heading2 { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 13px; color: #660066; font-style: italic }
|
||||
.talk-comment { margin-top: 1em; }
|
||||
.lesstop { margin-top: 2px; }
|
||||
.formitem { color: #343434; font-size: 1em; }
|
||||
.formnumber { font-weight: bold; margin-top: 1.8em; font-size: .9em; }
|
||||
.formitemName { font-weight: bold; font-size: .9em; margin-top: 1.8em; }
|
||||
.formitemDesc { margin-top: .4em; margin-bottom: .4em; color: #505050; }
|
||||
.formitemNote { color: #da6320; font-size: .9em; margin-top: .4em; margin-bottom: .4em; }
|
||||
.formitemFlag { color: #CE0000; font-size: .9em; margin-top: .4em; margin-bottom: .4em; }
|
||||
.borderedtable { border: solid 1px black; }
|
||||
.borderedtable th { background-color: #dddddd; border-bottom: solid 1px black; padding-left: 10px; padding-right: 10px; white-space: nowrap; font-size: 0.8em; }
|
||||
|
||||
#Comments q { padding-left: 2.5em; font-style: italic; }
|
||||
|
||||
.errorbar {
|
||||
color: #000;
|
||||
font: 12px Verdana, Arial, Sans-Serif;
|
||||
background-color: #FFEEEE;
|
||||
background-repeat: repeat-x;
|
||||
border: 1px solid #FF9999;
|
||||
padding: 8px;
|
||||
margin-top: auto; margin-bottom: auto;
|
||||
margin-left: auto; margin-right: auto;
|
||||
width: auto;
|
||||
text-align: left;
|
||||
}
|
||||
.warningbar {
|
||||
color: #000;
|
||||
font: 12px Verdana, Arial, Sans-Serif;
|
||||
background-color: #FFFFDD;
|
||||
background-repeat: repeat-x;
|
||||
border: 1px solid #FFCC33;
|
||||
padding: 8px;
|
||||
margin-top: auto; margin-bottom: auto;
|
||||
margin-left: auto; margin-right: auto;
|
||||
width: auto;
|
||||
text-align: left;
|
||||
}
|
||||
-->
|
||||
</style>
|
||||
|
||||
<script language="JavaScript">
|
||||
window.onerror = null; // damn javascript.
|
||||
</script>
|
||||
<?_code return (! LJ::get_remote() &&
|
||||
! $LJ::IS_SSL &&
|
||||
! $LJ::REQ_HEAD_HAS{'chalresp_js'}++) ?
|
||||
$LJ::COMMON_CODE{'chalresp_js'} : "";
|
||||
_code?>
|
||||
<?_code
|
||||
use strict;
|
||||
my $crumb_up;
|
||||
if(LJ::get_active_crumb() ne '')
|
||||
{
|
||||
my $parentcrumb = LJ::get_parent_crumb();
|
||||
$crumb_up = "<link rel='up' title='$parentcrumb->[0]' href='$parentcrumb->[1]' />";
|
||||
}
|
||||
return $crumb_up;
|
||||
_code?>
|
||||
%%head%%
|
||||
</head>
|
||||
<body bgcolor="#FFFFFF" background="<?imgprefix?>/dys/bg.gif" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" text="#000000" link="#660066" vlink="#000066" alink="#CC6600" %%bodyopts%%>
|
||||
<basefont face="Verdana,Arial,Helvetica">
|
||||
<table width="100%" border="0" cellspacing="0" cellpadding="0">
|
||||
<tr align="left" valign="top">
|
||||
<td colspan='2'>
|
||||
<table width='100%' border="0" cellspacing="0" cellpadding="0" background="<?imgprefix?>/dys/bg_top.gif">
|
||||
<tr>
|
||||
<td><a href="<?siteroot?>/"><img src="<?imgprefix?>/dys/logo1.gif" width="122" height="51" border="0"></a></td>
|
||||
<td width="163" align="left" valign="top"><a href="<?siteroot?>/"><img src="<?imgprefix?>/dys/logo2.gif" width="170" height="51" border="0"></a></td>
|
||||
<td background="<?imgprefix?>/dys/bg_top.gif" align="left" valign="top" width="244"> </td>
|
||||
<td background="<?imgprefix?>/dys/bg_top.gif" align="left" valign="top" width="100%"> </td>
|
||||
</tr>
|
||||
</table>
|
||||
</td>
|
||||
</tr>
|
||||
|
||||
<!-- logo, then search & logged in links bar stack on top of each other -->
|
||||
|
||||
<tr align="left" valign="top">
|
||||
<td width="<?_ml dystopia.nav.width _ml?>" height="49"
|
||||
><?_code
|
||||
unless ($BML::COOKIE{'langpref'}) {
|
||||
return '<img src="<?imgprefix?>/dys/logo3-lang.gif" width="122" height="52" border="0" ismap="ismap" usemap="#setlang"><map name="setlang"><area href="/manage/siteopts.bml" shape="rect" coords="50,25,122,50"></map>';
|
||||
} else {
|
||||
return '<img src="<?imgprefix?>/dys/logo3.gif" width="122" height="52" border="0">';
|
||||
}
|
||||
_code?></td>
|
||||
<td height="49">
|
||||
<table width="100%" border="0" cellspacing="0" cellpadding="0">
|
||||
<colgroup span="3">
|
||||
<col width="19%" />
|
||||
<col width="34%" />
|
||||
<col width="47%" />
|
||||
</colgroup>
|
||||
|
||||
<!-- search bar -->
|
||||
<tr valign="top">
|
||||
<td height="24" width="19%" align="left"> </td>
|
||||
<form action="/multisearch.bml">
|
||||
<td height="24" align="right" valign="middle" colspan="2" nowrap="nowrap">
|
||||
<font face="verdana, arial, sans-serif" color=#333333 size=-2>
|
||||
<span class="wtextunbld"><label for='searchlj'><?_ml dystopia.searchlj _ml?></label> </span>
|
||||
<?_code
|
||||
#BML:cache
|
||||
my $ret;
|
||||
my ($cur, $val) = ("user", "");
|
||||
my ($uri, $args) = (BML::get_uri(), BML::get_query_string());
|
||||
if ($uri eq '/interests.bml' && $args =~ /int=(.+?)(&|$)/) {
|
||||
$cur = "int";
|
||||
$val = LJ::durl($1);
|
||||
}
|
||||
if ($FORM{'s_loc'}) {
|
||||
$cur = "region";
|
||||
}
|
||||
|
||||
my $hval = LJ::ehtml($val);
|
||||
$ret .= "<input id='searchlj' type='text' name='q' size='15' class='login' value='$hval'> ";
|
||||
$ret .= '<select style="FONT-SIZE: 10px; FONT-FAMILY: verdana, arial, helvetica" name=type>';
|
||||
foreach my $it (
|
||||
["user", BML::ml("Username")],
|
||||
["email", BML::ml("Email")],
|
||||
["region", BML::ml("dystopia.search.region")],
|
||||
["int", BML::ml("dystopia.search.int")],
|
||||
["aolim", BML::ml("dystopia.search.aolim")],
|
||||
["icq", BML::ml("dystopia.search.icq")],
|
||||
["yahoo", BML::ml("dystopia.search.yahoo")],
|
||||
["msn", BML::ml("dystopia.search.msn")],
|
||||
["jabber", BML::ml("dystopia.search.jabber")],
|
||||
) {
|
||||
next if ($it->[0] eq "region" && $LJ::DISABLED{'directory'});
|
||||
my $sel = $cur eq $it->[0] ? " SELECTED" : "";
|
||||
$ret .= "<option value=$it->[0]$sel>$it->[1]";
|
||||
}
|
||||
return BML::noparse($ret);
|
||||
_code?>
|
||||
</select>
|
||||
<img src="<?imgprefix?>/dot.gif" width="1" height="5">
|
||||
<input type=submit value="<?_ml btn.search _ml?>" class="login">
|
||||
</font>
|
||||
</td></form>
|
||||
</tr>
|
||||
<!-- /search livejournal bar -->
|
||||
|
||||
|
||||
<!-- logged in bar -->
|
||||
<tr>
|
||||
<td height="27" class="wtext" width="53%" colspan="2" nowrap="nowrap" valign="middle">
|
||||
<?_code
|
||||
#BML:cache
|
||||
if (LJ::get_remote()) {
|
||||
return BML::noparse(BML::ml("dystopia.hello_loggedin", { 'username' => LJ::get_remote()->{'user'} }));
|
||||
} else {
|
||||
return BML::noparse(BML::ml("dystopia.hello_anonymous"))
|
||||
}
|
||||
_code?></td>
|
||||
<td height="27" width="47%" nowrap="nowrap" align="right" valign="middle">
|
||||
<a href="/"><span class="navlinks"><?_ml dystopia.nav.home _ml?></span></a> <span class="navtext">|</span>
|
||||
<a href="/site/"><span class="navlinks"><?_ml dystopia.nav.sitemap _ml?></span></a> <span class="navtext">|</span>
|
||||
<a href="/news.bml"><span class="navlinks"><?_ml dystopia.nav.news _ml?></span></a> <span class="navtext">|</span>
|
||||
<a href="/manage/siteopts.bml"><span class="navlinks"><?_ml dystopia.nav.siteopts _ml?></span></a> <span class="navtext">|</span>
|
||||
<a href="/support/"><span class="navlinks"><?_ml Help _ml?></span></a>
|
||||
<?_code
|
||||
#BML:cache
|
||||
my $r = LJ::get_remote();
|
||||
if ($r) {
|
||||
return BML::noparse(' <span class="navtext">|</span> <a href="/logout.bml?user=' . "$r->{'user'}&sessid=$r->{'_session'}->{'sessid'}" . '"><span class="navlinks">' . BML::ml("dystopia.nav.logout") . '</span></a>');
|
||||
}
|
||||
return;
|
||||
_code?>
|
||||
<img src="<?imgprefix?>/dys/5x5.gif" width="10" height="5"></td>
|
||||
</tr>
|
||||
<!-- /logged in bar -->
|
||||
|
||||
</table>
|
||||
</td>
|
||||
</tr>
|
||||
<!-- /logo, search, logged in bar -->
|
||||
|
||||
<!-- left sidebar and body -->
|
||||
|
||||
<tr align="left" valign="top">
|
||||
<td bgcolor="#336699" width="<?_ml dystopia.nav.width _ml?>" height="813">
|
||||
<table width="<?_ml dystopia.nav.width _ml?>" border="0" cellspacing="0" cellpadding="10">
|
||||
<?_code
|
||||
#BML:cache
|
||||
my @nav;
|
||||
my $remote = LJ::get_remote();
|
||||
if ($remote) {
|
||||
push @nav, { 'name' => BML::ml('dystopia.navhead.journal'),
|
||||
'links' => [ { 'url' => '/update.bml',
|
||||
'text' => BML::ml('dystopia.nav.updatejournal'), },
|
||||
{ 'url' => "/users/$remote->{'user'}/",
|
||||
'text' => BML::ml('dystopia.nav.journalrecent'), },
|
||||
{ 'url' => "/users/$remote->{'user'}/calendar",
|
||||
'text' => BML::ml('dystopia.nav.journalcalendar'), },
|
||||
{ 'url' => "/users/$remote->{'user'}/friends",
|
||||
'text' => BML::ml('dystopia.nav.journalfriends'),
|
||||
'extra' => '/friends/filter.bml', },
|
||||
{ 'url' => "/userinfo.bml?user=$remote->{'user'}",
|
||||
'text' => BML::ml('dystopia.nav.journalinfo'),
|
||||
'extra' => "/userinfo.bml?user=$remote->{'user'}&mode=full",
|
||||
},
|
||||
{ 'url' => "/tools/memories.bml?user=$remote->{'user'}",
|
||||
'text' => BML::ml('dystopia.nav.memories'), },
|
||||
{ 'url' => "/editjournal.bml",
|
||||
'text' => BML::ml('dystopia.nav.editentries'), },
|
||||
],
|
||||
};
|
||||
push @nav, { 'name' => BML::ml('dystopia.navhead.settings'),
|
||||
'links' => [ { 'url' => '/manage/',
|
||||
'text' => BML::ml('dystopia.nav.manage') },
|
||||
{ 'url' => '/editinfo.bml',
|
||||
'text' => BML::ml('dystopia.nav.personalinfo') },
|
||||
{ 'url' => "/friends/edit.bml",
|
||||
'text' => BML::ml('dystopia.nav.editfriends'), },
|
||||
{ 'url' => "/editpics.bml",
|
||||
'text' => BML::ml('dystopia.nav.editpics'), },
|
||||
{ 'url' => "/changepassword.bml",
|
||||
'text' => BML::ml('dystopia.nav.editpassword'), },
|
||||
{ 'url' => "/modify.bml",
|
||||
'text' => BML::ml('dystopia.nav.modifyjournal'), },
|
||||
{ 'url' => "/styles/edit.bml",
|
||||
'text' => BML::ml('dystopia.nav.editstyle'), },
|
||||
],
|
||||
};
|
||||
}
|
||||
else
|
||||
{
|
||||
push @nav, { 'name' => BML::ml('dystopia.navhead.welcome'),
|
||||
'links' => [
|
||||
{ 'url' => '/login.bml',
|
||||
'text' => BML::ml('dystopia.nav.login'), },
|
||||
{ 'url' => '/create.bml',
|
||||
'text' => BML::ml('dystopia.nav.createjournal'), },
|
||||
{ 'url' => "/update.bml",
|
||||
'text' => BML::ml('dystopia.nav.updatejournal'), },
|
||||
],
|
||||
};
|
||||
|
||||
}
|
||||
|
||||
push @nav, { 'name' => BML::ml('dystopia.navhead.findusers'),
|
||||
'links' => [
|
||||
{ 'url' => '/random.bml',
|
||||
'text' => BML::ml('dystopia.nav.findrandom'), },
|
||||
$LJ::DISABLED{'directory'} ? () :
|
||||
(
|
||||
{ 'url' => '/directory.bml',
|
||||
'text' => BML::ml('dystopia.nav.findregion'), }
|
||||
),
|
||||
{ 'url' => '/community/',
|
||||
'text' => BML::ml('dystopia.nav.findcomm'), },
|
||||
{ 'url' => '/interests.bml',
|
||||
'text' => BML::ml('dystopia.nav.findint'), },
|
||||
$LJ::DISABLED{'directory'} ? () :
|
||||
(
|
||||
{ 'url' => '/directorysearch.bml',
|
||||
'text' => BML::ml('dystopia.nav.finddir'), }
|
||||
),
|
||||
],
|
||||
};
|
||||
|
||||
push @nav, { 'name' => 'LiveJournal',
|
||||
'links' => [
|
||||
{ 'url' => '/download/',
|
||||
'text' => BML::ml('dystopia.nav.download'), },
|
||||
{ 'url' => '/paidaccounts/',
|
||||
'text' => BML::ml('dystopia.nav.paidaccts'), },
|
||||
{ 'url' => '/pay/',
|
||||
'text' => BML::ml('dystopia.nav.paymentarea'), },
|
||||
],
|
||||
};
|
||||
|
||||
push @nav, { 'name' => BML::ml('dystopia.navhead.help'),
|
||||
'links' => [ { 'url' => '/support/faq.bml',
|
||||
'text' => BML::ml('dystopia.nav.faq'), },
|
||||
{ 'url' => '/support/',
|
||||
'text' => BML::ml('dystopia.nav.support'), },
|
||||
{ 'url' => '/lostinfo.bml',
|
||||
'text' => BML::ml('dystopia.nav.lostinfo'), },
|
||||
{ 'url' => '/developer/',
|
||||
'text' => BML::ml('dystopia.nav.developer'), },
|
||||
{ 'url' => '/press/staff.bml',
|
||||
'text' => BML::ml('dystopia.nav.contact'), },
|
||||
],
|
||||
};
|
||||
|
||||
push @nav, { 'name' => BML::ml('dystopia.navhead.legal'),
|
||||
'links' => [ { 'url' => '/tos.html',
|
||||
'text' => BML::ml('dystopia.nav.legaltos'), },
|
||||
{ 'url' => '/privacy.bml',
|
||||
'text' => BML::ml('dystopia.nav.legalprivacy'), },
|
||||
# { 'url' => '/legal/dmca.bml',
|
||||
# 'text' => BML::ml('dystopia.nav.legaldmca'), },
|
||||
],
|
||||
};
|
||||
|
||||
|
||||
my $ret = $LJ::DYS_LEFT_TOP;
|
||||
foreach my $sec (@nav) {
|
||||
$ret .= "<tr align=left valign=top><td><p><span class=navtext>$sec->{'name'}</span><br />";
|
||||
foreach my $l (@{$sec->{'links'}}) {
|
||||
$ret .= "<a href=\"$l->{'url'}\"><span class=navlinks>$l->{'text'}</span></a>";
|
||||
if ($l->{'extra'}) {
|
||||
$ret .= " <a href=\"$l->{'extra'}\"><span class=navlinks>...</span></a>";
|
||||
}
|
||||
$ret .= "<br />";
|
||||
}
|
||||
$ret .= "</td></tr>";
|
||||
}
|
||||
return BML::noparse($ret);
|
||||
|
||||
_code?>
|
||||
<tr align="left" valign="top">
|
||||
<td> </td>
|
||||
</tr>
|
||||
<tr align="left" valign="top">
|
||||
<td> </td>
|
||||
</tr>
|
||||
<tr align="left" valign="top">
|
||||
<td> </td>
|
||||
</tr>
|
||||
</table>
|
||||
<p> </p>
|
||||
<p> </p>
|
||||
</td>
|
||||
<td height="813" bgcolor="#FFFFFF">
|
||||
<table width="100%" border="0" cellspacing="0" cellpadding="0">
|
||||
|
||||
<!-- login bar -->
|
||||
<?_code
|
||||
#BML:cache
|
||||
#WITHPORTAL: unless ($remote || BML::get_uri() eq "/") {
|
||||
my $remote = LJ::get_remote();
|
||||
unless ($remote || BML::get_uri eq '/login.bml') {
|
||||
my $button;
|
||||
my $logincaption = BML::ml('dystopia.btn.login');
|
||||
if ($logincaption eq 'LOGIN') {
|
||||
if (! $LJ::IS_SSL) {
|
||||
$button = "<input type=image onclick='return sendForm()' src='$LJ::IMGPREFIX/dys/login_but.gif' width='48' height='15' border='0'>";
|
||||
} else {
|
||||
$button = "<input type=image src='$LJ::IMGPREFIX/dys/login_but.gif' width='48' height='15' border='0'>";
|
||||
}
|
||||
} else {
|
||||
if (! $LJ::IS_SSL) {
|
||||
$button = "<input type='submit' onclick='return sendForm()' value='$ML{'dystopia.btn.login'}' style='margin-top: 0px; margin-bottom: 1px; font-weight: bold; height: 19px; border: 1px solid #ffffff; background: #336699 none; color: #ffffff; padding-left: 0px; padding-right: 0px'></td>";
|
||||
} else {
|
||||
$button = "<input type='submit' value='$ML{'dystopia.btn.login'}' style='margin-top: 0px; margin-bottom: 1px; font-weight: bold; height: 19px; border: 1px solid #ffffff; background: #336699 none; color: #ffffff; padding-left: 0px; padding-right: 0px'></td>";
|
||||
}
|
||||
}
|
||||
|
||||
my $chal = LJ::challenge_generate(300);
|
||||
return <<"END_LOGIN_BAR";
|
||||
<form action="/login.bml" method="post" id='login'>
|
||||
<input type="hidden" name="mode" value="login" />
|
||||
<input type='hidden' name='chal' id='login_chal' value='$chal' />
|
||||
<input type='hidden' name='response' id='login_response' value='' />
|
||||
<tr>
|
||||
<td align="right" valign="top" bgcolor="#FFFFFF">
|
||||
<table border='0' cellspacing='0' cellpadding='0' width='200' align='right'>
|
||||
<tr>
|
||||
<td align="left" valign="bottom" bgcolor="#660066"><img src="<?imgprefix?>/dys/lg_crnrgif.gif" width="14" height="23"></td>
|
||||
<td align="right" valign="middle" bgcolor="#660066" class="wtextunbld" nowrap="nowrap"> $ML{'Username'}: </td>
|
||||
<td align="center" valign="top" bgcolor="#660066" class="wtext" nowrap="nowrap"><input type="text" name="user" size="15" maxlength="15" class="login" style="<?loginboxstyle?>"></td>
|
||||
<td align="right" valign="middle" bgcolor="#660066" class="wtextunbld" nowrap="nowrap"> $ML{'Password'}: </td>
|
||||
<td align="center" valign="top" bgcolor="#660066" class="wtext" nowrap="nowrap"><input type="password" name="password" size="10" id='xc_password' class="login"></td>
|
||||
<td align="center" valign="middle" bgcolor="#660066" nowrap="nowrap"> $button</tr>
|
||||
</table>
|
||||
</td></tr>
|
||||
</form>
|
||||
END_LOGIN_BAR
|
||||
}
|
||||
return;
|
||||
|
||||
_code?>
|
||||
<!-- /login bar -->
|
||||
|
||||
<tr align="left" valign="top" bgcolor="#ffffff">
|
||||
<td height="585" colspan="7">
|
||||
|
||||
<!-- body area -->
|
||||
<table border="0" cellspacing="0" cellpadding="10" width="100%"><tr><td>
|
||||
|
||||
<?breadcrumbs?>
|
||||
|
||||
%%pretitle%%
|
||||
|
||||
<font size="+2" face="Verdana, Arial, Helvetica" color=#000066>%%title%%</font><p>
|
||||
|
||||
%%body%%
|
||||
|
||||
</td></tr></table>
|
||||
<!-- /body area -->
|
||||
</td></tr></table>
|
||||
</td></tr></table>
|
||||
</body></html>
|
||||
<=PAGE
|
||||
|
||||
379
local/cgi-bin/bml/scheme/global.look
Executable file
379
local/cgi-bin/bml/scheme/global.look
Executable file
@@ -0,0 +1,379 @@
|
||||
_parent=>../../lj-bml-blocks.pl
|
||||
|
||||
loginboxstyle=>{Ss}background: url(<?imgprefix?>/userinfo.gif) no-repeat; background-color: #fff; background-position: 0px 1px; padding-left: 18px; color: #00C; font-weight: bold;
|
||||
commloginboxstyle=>{Ss}background: url(<?imgprefix?>/community.gif) no-repeat; background-color: #fff; background-position: 0px 2px; padding-left: 19px; color: #00C; font-weight: bold;
|
||||
|
||||
SECURITYPRIVATE=>{Ss}<img src="<?imgprefix?>/icon_private.gif" width=16 height=16 align=absmiddle>
|
||||
SECURITYPROTECTED=>{Ss}<img src="<?imgprefix?>/icon_protected.gif" width=14 height=15 align=absmiddle>
|
||||
LJUSER=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%'><img src='<?imgprefix?>/userinfo.gif' alt='userinfo' width='17' height='17' style='vertical-align:bottom;border:0;' /></a><a href='/users/%%data%%/'><b>%%data%%</b></a></span>
|
||||
LJCOMM=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%'><img src='<?imgprefix?>/community.gif' alt='userinfo' width='16' height='16' style='vertical-align:bottom;border:0;' /></a><a href='/community/%%data%%/'><b>%%data%%</b></a></span>
|
||||
LJUSERF=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%&mode=full'><img src='<?imgprefix?>/userinfo.gif' alt='userinfo' width='17' height='17' style='vertical-align:bottom;border:0;' /></a><a href='/users/%%data%%/'><b>%%data%%</b></a></span>
|
||||
HELP=>{DR}(<a href="%%data%%"><i>help</i></a>)
|
||||
INERR=>{DR}<font color="#ff0000"><b>%%data%%</b></font>
|
||||
SOERROR=>{DR}<div><b>%%data%%</b></div>
|
||||
EMAILEX=><div style='font-family: courier; border: solid black 1px; padding: 5px;'>%%data%%</div>
|
||||
|
||||
ENTRYFORMCSS<=
|
||||
{Ss}
|
||||
<style type="text/css">
|
||||
#EntryForm #MetaInfo {
|
||||
width: 100%;
|
||||
}
|
||||
#EntryForm th {
|
||||
font-size: 1em;
|
||||
}
|
||||
#EntryForm #SubmitBar {
|
||||
background-color: #dfdfdf;
|
||||
padding: 5px;
|
||||
text-align: center;
|
||||
border: 1px outset #000;
|
||||
margin-left: auto; margin-right: auto;
|
||||
}
|
||||
#MetaInfo tr {
|
||||
padding-bottom: 10px;
|
||||
}
|
||||
#metainfo th {
|
||||
text-align: left;
|
||||
}
|
||||
#mood_preview {
|
||||
display: none;
|
||||
}
|
||||
#datetime_box input, #datetime_box select {
|
||||
margin-right: 2px;
|
||||
}
|
||||
#EntryForm legend {
|
||||
font-weight: bold;
|
||||
}
|
||||
#EntryForm #Options {
|
||||
margin-left: 0; margin-right: 0; padding: 0;
|
||||
background-color: #dfdfdf;
|
||||
border: 1px outset #000;
|
||||
}
|
||||
#EntryForm #Options th {
|
||||
text-align: left;
|
||||
}
|
||||
#EntryForm #infobox {
|
||||
text-align: center;
|
||||
}
|
||||
#EntryForm #infobox table {
|
||||
background-color: #dfdfdf;
|
||||
border: 2px solid <?emcolor?>;
|
||||
}
|
||||
#EntryForm textarea {
|
||||
border: 1px inset #000;
|
||||
padding: 2px;
|
||||
}
|
||||
#EntryForm #Security option {
|
||||
padding-left: 18px;
|
||||
}
|
||||
#EntryForm #security_public {
|
||||
background-image: url("<?imgprefix?>/userinfo.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #security_private {
|
||||
background-image: url("<?imgprefix?>/icon_private.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #security_friends, #EntryForm #security_custom {
|
||||
background-image: url("<?imgprefix?>/icon_protected.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #UserpicPreviewImage {
|
||||
border: 1px solid #000;
|
||||
}
|
||||
#EntryForm {
|
||||
width: 100%;
|
||||
}
|
||||
</style>
|
||||
<=ENTRYFORMCSS
|
||||
|
||||
NEEDLOGIN<=
|
||||
<?h1 <?_ml bml.needlogin.head _ml?> h1?>
|
||||
<?p <?_ml bml.needlogin.body2 _ml?> p?>
|
||||
<=NEEDLOGIN
|
||||
|
||||
BADINPUT<=
|
||||
<?h1 <?_ml bml.badinput.head _ml?> h1?>
|
||||
<?p <?_ml bml.badinput.body _ml?> p?>
|
||||
<=BADINPUT
|
||||
|
||||
REQUIREPOST=><?_ml bml.requirepost _ml?>
|
||||
|
||||
LOAD_PAGE_INFO<=
|
||||
<?_code
|
||||
#line 3
|
||||
@sidebar = ({ 'name' => 'Home',
|
||||
'uri' => '/',
|
||||
'match' => "^/(index\\.bml)?(\\?.*)?\$",
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.create'),
|
||||
'uri' => '/create.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.update'),
|
||||
'uri' => '/update.bml',
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.fullupdate'),
|
||||
'uri' => '/update.bml?mode=full', }
|
||||
],
|
||||
},
|
||||
# { 'name' => 'Download',
|
||||
# 'uri' => '/download/', },
|
||||
],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.site'),
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.news'),
|
||||
'match' => '^/news\\.bml\$',
|
||||
'uri' => '/community/ljr_news/', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.siteopts'),
|
||||
'uri' => '/manage/siteopts.bml', },
|
||||
{ 'name' => 'Sitemap',
|
||||
'uri' => '/site/', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.paidaccounts'),
|
||||
'uri' => '/paidaccounts/',
|
||||
# 'recursematch' => '^/paidaccounts/',
|
||||
# 'children' => [
|
||||
# { 'name' => 'Is this safe?',
|
||||
# 'uri' => '/paidaccounts/whysafe.bml', },
|
||||
# { 'name' => 'Progress',
|
||||
# 'uri' => '/paidaccounts/progress.bml', },
|
||||
# ],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.ljfif'),
|
||||
'uri' => '/users/ljr_fif/friends', },
|
||||
# { 'name' => 'To-Do list',
|
||||
# 'uri' => '/todo.bml', },
|
||||
# { 'name' => 'Contributors',
|
||||
# 'uri' => '/contributors.bml', },
|
||||
],
|
||||
},
|
||||
# { 'name' => 'Find Users',
|
||||
# 'children' => [
|
||||
# { 'name' => 'Random!',
|
||||
# 'uri' => '/random.bml', },
|
||||
# { 'name' => 'By Region',
|
||||
# 'uri' => '/directory.bml', },
|
||||
# { 'name' => 'By Interest',
|
||||
# 'uri' => '/interests.bml', },
|
||||
# { 'name' => 'Search',
|
||||
# 'uri' => '/directorysearch.bml', }
|
||||
# ], },
|
||||
{ 'name' => BML::ml('ljrlook.nav.edit'),
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.editinfo'),
|
||||
'uri' => '/editinfo.bml', },
|
||||
# { 'name' => 'Settings', cont => 1,
|
||||
# 'uri' => '/editinfo.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.editfriends'),
|
||||
'uri' => '/friends/edit.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.editjournal'),
|
||||
'uri' => '/editjournal.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.editpics'),
|
||||
'uri' => '/editpics.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.changepassword'),
|
||||
'uri' => '/changepassword.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.modify'),
|
||||
'uri' => '/modify.bml', },
|
||||
# { 'name' => 'Import',
|
||||
# 'uri' => '/import.bml' },
|
||||
],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.communities.manage'),
|
||||
'uri' => '/community/manage.bml'
|
||||
},
|
||||
# { 'name' => 'Developer Area',
|
||||
# 'uri' => '/developer/',
|
||||
# 'match' => "^/developer/\$",
|
||||
# 'recursematch' => "^/developer/",
|
||||
# 'children' => [
|
||||
# { 'name' => 'Style System',
|
||||
# 'uri' => '/developer/styles.bml',
|
||||
# 'children' => [
|
||||
# { 'name' => 'View Types',
|
||||
# 'uri' => '/developer/views.bml', },
|
||||
# { 'name' => 'Variable List',
|
||||
# 'uri' => '/developer/varlist.bml', },
|
||||
# ],
|
||||
# },
|
||||
# { 'name' => 'Embedding',
|
||||
# 'uri' => '/developer/embedding.bml', },
|
||||
# { 'name' => 'Protocol',
|
||||
# 'uri' => '/developer/protocol.bml',
|
||||
# 'children' => [
|
||||
# { 'name' => 'Mode List',
|
||||
# 'uri' => '/developer/modelist.bml', }
|
||||
# ],
|
||||
# },
|
||||
# ],
|
||||
# },
|
||||
# { 'name' => BML::ml('ljrlook.nav.frills'),#Styles,customization
|
||||
# 'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.customize'),
|
||||
'uri' => '/customize/', },
|
||||
# { 'name' => BML::ml('ljrlook.nav.createstyle'),
|
||||
# 'uri' => '/createstyle.bml', },
|
||||
# { 'name' => BML::ml('ljrlook.nav.editstyle'),
|
||||
# 'uri' => '/editstyle.bml', },
|
||||
# ],
|
||||
# },
|
||||
{ 'name' => BML::ml('ljrlook.nav.needhelp'),
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.lostinfo'),
|
||||
'uri' => '/lostinfo.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.support.faq'),
|
||||
'uri' => '/support/faq.bml', },
|
||||
# { 'name' => 'Questions',
|
||||
# 'uri' => '/support/faq.bml', cont => 1, },
|
||||
{ 'name' => BML::ml('ljrlook.nav.support'),
|
||||
'uri' => '/support/', },
|
||||
],
|
||||
},
|
||||
);
|
||||
|
||||
my $remote = LJ::get_remote();
|
||||
my $remuser = $remote ? $remote->{'user'} : "";
|
||||
my $hello_name = $remote ? LJ::User::display_name($remote) : "";
|
||||
my $uri = BML::get_uri();
|
||||
if ($remuser ne "" && $uri ne "/logout.bml")
|
||||
{
|
||||
my $subdomain = $remuser;
|
||||
$subdomain =~ s/_/-/g;
|
||||
unshift @sidebar, { 'name' => BML::ml('ljrlook.nav.hello').", ".$hello_name."!",
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.yourjournal'),
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.recent'),
|
||||
'uri' => "/users/$remuser/", },
|
||||
{ 'name' => BML::ml('ljrlook.nav.calendar'),
|
||||
'uri' => "/users/$remuser/calendar", },
|
||||
{ 'name' => BML::ml('ljrlook.nav.friends'),
|
||||
'uri' => "/users/$remuser/friends",
|
||||
'extra' => "/friendsfilter.bml",
|
||||
},
|
||||
],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.userinfo'),
|
||||
'uri' => "/userinfo.bml?user=$remuser", },
|
||||
{ 'name' => BML::ml('ljrlook.nav.memories'),
|
||||
'uri' => "/memories.bml?user=$remuser", },
|
||||
{ 'name' => BML::ml('ljrlook.nav.logout'),
|
||||
'uri' => '/logout.bml', },
|
||||
]
|
||||
};
|
||||
} elsif ($uri ne "/login.bml") {
|
||||
unshift @sidebar, { 'name' => BML::ml('ljrlook.nav.login'),,
|
||||
'uri' => '/login.bml', }
|
||||
}
|
||||
|
||||
return "";
|
||||
_code?>
|
||||
<=LOAD_PAGE_INFO
|
||||
|
||||
AL=>{P}<i><a href="%%data1%%">%%data2%%</a></i> <img src="/img/external_link.gif" width='16' height='11' align='absmiddle' />
|
||||
AWAYLINK=>{P}<i><a href="%%data1%%">%%data2%%</a></i> <img src="/img/external_link.gif" width='16' height='11' align='absmiddle' />
|
||||
|
||||
H1=>{D}<h1>%%data%%</h1>
|
||||
H2=>{D}<h2>%%data%%</h2>
|
||||
|
||||
# Banner Header: search results banner, content desriptor, etc...
|
||||
BH=>{D}<p align='center'><font face="Arial,Helvetica" color="#CC0000" size='-1'><b>%%data%%</b></font>
|
||||
|
||||
GRIN=>{S}<grin>
|
||||
HR=>{S}<hr />
|
||||
|
||||
NEWLINE=>{S}<BR>
|
||||
P=>{D}<P>%%data%%</P>
|
||||
|
||||
STANDOUT<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=STANDOUT
|
||||
|
||||
ERRORBAR<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=ERRORBAR
|
||||
|
||||
WARNINGBAR<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=WARNINGBAR
|
||||
|
||||
BADCONTENT<=
|
||||
<?h1 <?_ml Error _ml?> h1?>
|
||||
<?p <?_ml bml.badcontent.body _ml?> p?>
|
||||
<=BADCONTENT
|
||||
|
||||
DE<=
|
||||
%%data%%
|
||||
<=DE
|
||||
|
||||
EMCOLOR=>{S}#c0c0c0
|
||||
HOTCOLOR=>{S}#ff0000
|
||||
EMCOLORLITE=>{S}#e2e2e2
|
||||
ALTCOLOR1=>{S}#eeeeee
|
||||
ALTCOLOR2=>{S}#dddddd
|
||||
screenedbarcolor=>{S}#d0d0d0
|
||||
|
||||
CHOICE=>{P}<dt><a href="%%data2%%"><font size="+1"><tt><b>%%data1%%</b></tt></font></a><dd><font size="2">%%data3%%</font>
|
||||
|
||||
CHOICES<=
|
||||
{F}<table width="100%" cellpadding="2" cellspacing="5">
|
||||
<tr>
|
||||
<td valign='top' width="50%">
|
||||
<dl>
|
||||
%%items%%
|
||||
</dl>
|
||||
</td>
|
||||
<td valign='top' width="50%">
|
||||
<dl>
|
||||
%%itemsb%%
|
||||
</dl>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
<=CHOICES
|
||||
|
||||
PAGE<=
|
||||
{Fp}<html>
|
||||
<head><title>%%title%%</title>%%head%%</head>
|
||||
<body %%bodyopts%%>
|
||||
%%body%%
|
||||
</body>
|
||||
</html>
|
||||
<=PAGE
|
||||
|
||||
BREADCRUMBS<=
|
||||
{Fp}<?_code
|
||||
# where are we
|
||||
my @crumbs = LJ::get_crumb_path();
|
||||
return unless @crumbs;
|
||||
my @ret;
|
||||
my $count = 0;
|
||||
foreach my $crumb (@crumbs) {
|
||||
# put crumbs together
|
||||
next unless $crumb->[3]; # no blank crumbs
|
||||
if ($crumb->[3] eq 'dynamic') {
|
||||
# dynamic
|
||||
unshift @ret, "<b>$crumb->[0]</b>";
|
||||
$count++;
|
||||
} else {
|
||||
# non-dynamic
|
||||
unshift @ret, $count++ == 0 ?
|
||||
"<b>$ML{'crumb.'.$crumb->[3]}</b>" :
|
||||
$crumb->[1] ne '' ?
|
||||
"<a href=\"$crumb->[1]\">$ML{'crumb.'.$crumb->[3]}</a>" :
|
||||
"$ML{'crumb.'.$crumb->[3]}";
|
||||
}
|
||||
}
|
||||
return "<div id='ljbreadcrumbs'>" . join(" : ", @ret) . "</div>";
|
||||
_code?>
|
||||
<=BREADCRUMBS
|
||||
370
local/cgi-bin/bml/scheme/global.look.original
Executable file
370
local/cgi-bin/bml/scheme/global.look.original
Executable file
@@ -0,0 +1,370 @@
|
||||
_parent=>../../lj-bml-blocks.pl
|
||||
|
||||
loginboxstyle=>{Ss}background: url(<?imgprefix?>/userinfo.gif) no-repeat; background-color: #fff; background-position: 0px 1px; padding-left: 18px; color: #00C; font-weight: bold;
|
||||
commloginboxstyle=>{Ss}background: url(<?imgprefix?>/community.gif) no-repeat; background-color: #fff; background-position: 0px 2px; padding-left: 19px; color: #00C; font-weight: bold;
|
||||
|
||||
SECURITYPRIVATE=>{Ss}<img src="<?imgprefix?>/icon_private.gif" width=16 height=16 align=absmiddle>
|
||||
SECURITYPROTECTED=>{Ss}<img src="<?imgprefix?>/icon_protected.gif" width=14 height=15 align=absmiddle>
|
||||
LJUSER=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%'><img src='<?imgprefix?>/userinfo.gif' alt='userinfo' width='17' height='17' style='vertical-align:bottom;border:0;' /></a><a href='/users/%%data%%/'><b>%%data%%</b></a></span>
|
||||
LJCOMM=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%'><img src='<?imgprefix?>/community.gif' alt='userinfo' width='16' height='16' style='vertical-align:bottom;border:0;' /></a><a href='/community/%%data%%/'><b>%%data%%</b></a></span>
|
||||
LJUSERF=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%&mode=full'><img src='<?imgprefix?>/userinfo.gif' alt='userinfo' width='17' height='17' style='vertical-align:bottom;border:0;' /></a><a href='/users/%%data%%/'><b>%%data%%</b></a></span>
|
||||
HELP=>{DR}(<a href="%%data%%"><i>help</i></a>)
|
||||
INERR=>{DR}<font color="#ff0000"><b>%%data%%</b></font>
|
||||
SOERROR=>{DR}<div><b>%%data%%</b></div>
|
||||
EMAILEX=><div style='font-family: courier; border: solid black 1px; padding: 5px;'>%%data%%</div>
|
||||
|
||||
ENTRYFORMCSS<=
|
||||
{Ss}
|
||||
<style type="text/css">
|
||||
#EntryForm #MetaInfo {
|
||||
width: 100%;
|
||||
}
|
||||
#EntryForm th {
|
||||
font-size: 1em;
|
||||
}
|
||||
#EntryForm #SubmitBar {
|
||||
background-color: #dfdfdf;
|
||||
padding: 5px;
|
||||
text-align: center;
|
||||
border: 1px outset #000;
|
||||
margin-left: auto; margin-right: auto;
|
||||
}
|
||||
#MetaInfo tr {
|
||||
padding-bottom: 10px;
|
||||
}
|
||||
#metainfo th {
|
||||
text-align: left;
|
||||
}
|
||||
#mood_preview {
|
||||
display: none;
|
||||
}
|
||||
#datetime_box input, #datetime_box select {
|
||||
margin-right: 2px;
|
||||
}
|
||||
#EntryForm legend {
|
||||
font-weight: bold;
|
||||
}
|
||||
#EntryForm #Options {
|
||||
margin-left: 0; margin-right: 0; padding: 0;
|
||||
background-color: #dfdfdf;
|
||||
border: 1px outset #000;
|
||||
}
|
||||
#EntryForm #Options th {
|
||||
text-align: left;
|
||||
}
|
||||
#EntryForm #infobox {
|
||||
text-align: center;
|
||||
}
|
||||
#EntryForm #infobox table {
|
||||
background-color: #dfdfdf;
|
||||
border: 2px solid <?emcolor?>;
|
||||
}
|
||||
#EntryForm textarea {
|
||||
border: 1px inset #000;
|
||||
padding: 2px;
|
||||
}
|
||||
#EntryForm #Security option {
|
||||
padding-left: 18px;
|
||||
}
|
||||
#EntryForm #security_public {
|
||||
background-image: url("<?imgprefix?>/userinfo.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #security_private {
|
||||
background-image: url("<?imgprefix?>/icon_private.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #security_friends, #EntryForm #security_custom {
|
||||
background-image: url("<?imgprefix?>/icon_protected.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #UserpicPreviewImage {
|
||||
border: 1px solid #000;
|
||||
}
|
||||
#EntryForm {
|
||||
width: 100%;
|
||||
}
|
||||
</style>
|
||||
<=ENTRYFORMCSS
|
||||
|
||||
NEEDLOGIN<=
|
||||
<?h1 <?_ml bml.needlogin.head _ml?> h1?>
|
||||
<?p <?_ml bml.needlogin.body2 _ml?> p?>
|
||||
<=NEEDLOGIN
|
||||
|
||||
BADINPUT<=
|
||||
<?h1 <?_ml bml.badinput.head _ml?> h1?>
|
||||
<?p <?_ml bml.badinput.body _ml?> p?>
|
||||
<=BADINPUT
|
||||
|
||||
REQUIREPOST=><?_ml bml.requirepost _ml?>
|
||||
|
||||
LOAD_PAGE_INFO<=
|
||||
<?_code
|
||||
#line 3
|
||||
@sidebar = ({ 'name' => 'Home',
|
||||
'uri' => '/',
|
||||
'match' => "^/(index\\.bml)?(\\?.*)?\$",
|
||||
'children' => [
|
||||
{ 'name' => 'Create Journal',
|
||||
'uri' => '/create.bml', },
|
||||
{ 'name' => 'Update',
|
||||
'uri' => '/update.bml',
|
||||
'children' => [
|
||||
{ 'name' => 'Full Update',
|
||||
'uri' => '/update.bml?mode=full', }
|
||||
],
|
||||
},
|
||||
# { 'name' => 'Download',
|
||||
# 'uri' => '/download/', },
|
||||
],
|
||||
},
|
||||
{ 'name' => 'LiveJournal',
|
||||
'children' => [
|
||||
{ 'name' => 'News',
|
||||
'match' => '^/news\\.bml\$',
|
||||
'uri' => '/news.bml', },
|
||||
# { 'name' => 'Paid Accounts',
|
||||
# 'uri' => '/paidaccounts/',
|
||||
# 'recursematch' => '^/paidaccounts/',
|
||||
# 'children' => [
|
||||
# { 'name' => 'Is this safe?',
|
||||
# 'uri' => '/paidaccounts/whysafe.bml', },
|
||||
# { 'name' => 'Progress',
|
||||
# 'uri' => '/paidaccounts/progress.bml', },
|
||||
# ],
|
||||
# },
|
||||
{ 'name' => 'To-Do list',
|
||||
'uri' => '/todo.bml', },
|
||||
# { 'name' => 'Contributors',
|
||||
# 'uri' => '/contributors.bml', },
|
||||
],
|
||||
},
|
||||
{ 'name' => 'Customize',
|
||||
'children' => [
|
||||
{ 'name' => 'Modify Journal',
|
||||
'uri' => '/modify.bml',
|
||||
'children' => [
|
||||
{ 'name' => 'Customize S2',
|
||||
'uri' => '/customize/', },
|
||||
],
|
||||
},
|
||||
{ 'name' => 'Create Style',
|
||||
'uri' => '/createstyle.bml', },
|
||||
{ 'name' => 'Edit Style',
|
||||
'uri' => '/editstyle.bml', },
|
||||
],
|
||||
},
|
||||
{ 'name' => 'Find Users',
|
||||
'children' => [
|
||||
{ 'name' => 'Random!',
|
||||
'uri' => '/random.bml', },
|
||||
{ 'name' => 'By Region',
|
||||
'uri' => '/directory.bml', },
|
||||
{ 'name' => 'By Interest',
|
||||
'uri' => '/interests.bml', },
|
||||
{ 'name' => 'Search',
|
||||
'uri' => '/directorysearch.bml', }
|
||||
], },
|
||||
{ 'name' => 'Edit ...',
|
||||
'children' => [
|
||||
{ 'name' => 'Personal Info &',
|
||||
'uri' => '/editinfo.bml', },
|
||||
{ 'name' => 'Settings', cont => 1,
|
||||
'uri' => '/editinfo.bml', },
|
||||
{ 'name' => 'Your Friends',
|
||||
'uri' => '/editfriends.bml', },
|
||||
{ 'name' => 'Old Entries',
|
||||
'uri' => '/editjournal.bml', },
|
||||
{ 'name' => 'Your Pictures',
|
||||
'uri' => '/editpics.bml', },
|
||||
{ 'name' => 'Your Password',
|
||||
'uri' => '/changepassword.bml', },
|
||||
],
|
||||
},
|
||||
# { 'name' => 'Developer Area',
|
||||
# 'uri' => '/developer/',
|
||||
# 'match' => "^/developer/\$",
|
||||
# 'recursematch' => "^/developer/",
|
||||
# 'children' => [
|
||||
# { 'name' => 'Style System',
|
||||
# 'uri' => '/developer/styles.bml',
|
||||
# 'children' => [
|
||||
# { 'name' => 'View Types',
|
||||
# 'uri' => '/developer/views.bml', },
|
||||
# { 'name' => 'Variable List',
|
||||
# 'uri' => '/developer/varlist.bml', },
|
||||
# ],
|
||||
# },
|
||||
# { 'name' => 'Embedding',
|
||||
# 'uri' => '/developer/embedding.bml', },
|
||||
# { 'name' => 'Protocol',
|
||||
# 'uri' => '/developer/protocol.bml',
|
||||
# 'children' => [
|
||||
# { 'name' => 'Mode List',
|
||||
# 'uri' => '/developer/modelist.bml', }
|
||||
# ],
|
||||
# },
|
||||
# ],
|
||||
# },
|
||||
{ 'name' => 'Need Help?',
|
||||
'children' => [
|
||||
{ 'name' => 'Lost Password?',
|
||||
'uri' => '/lostinfo.bml', },
|
||||
{ 'name' => 'Freq. Asked',
|
||||
'uri' => '/support/faq.bml', },
|
||||
{ 'name' => 'Questions',
|
||||
'uri' => '/support/faq.bml', cont => 1, },
|
||||
{ 'name' => 'Support Area',
|
||||
'uri' => '/support/', },
|
||||
],
|
||||
},
|
||||
);
|
||||
|
||||
my $remote = LJ::get_remote();
|
||||
my $remuser = $remote ? $remote->{'user'} : "";
|
||||
my $uri = BML::get_uri();
|
||||
if ($remuser ne "" && $uri ne "/logout.bml")
|
||||
{
|
||||
my $subdomain = $remuser;
|
||||
$subdomain =~ s/_/-/g;
|
||||
unshift @sidebar, { 'name' => "Hello, $remuser!",
|
||||
'children' => [
|
||||
{ 'name' => 'Your Journal',
|
||||
'children' => [
|
||||
{ 'name' => 'Recent',
|
||||
'uri' => "/users/$remuser/", },
|
||||
{ 'name' => 'Calendar',
|
||||
'uri' => "/users/$remuser/calendar", },
|
||||
{ 'name' => 'Friends',
|
||||
'uri' => "/users/$remuser/friends",
|
||||
'extra' => "/friendsfilter.bml",
|
||||
},
|
||||
],
|
||||
},
|
||||
{ 'name' => 'User Info',
|
||||
'uri' => "/userinfo.bml?user=$remuser", },
|
||||
{ 'name' => 'Memories',
|
||||
'uri' => "/memories.bml?user=$remuser", },
|
||||
{ 'name' => 'Logout',
|
||||
'uri' => '/logout.bml', },
|
||||
]
|
||||
};
|
||||
} elsif ($uri ne "/login.bml") {
|
||||
unshift @sidebar, { 'name' => "Log In",
|
||||
'uri' => '/login.bml', }
|
||||
}
|
||||
|
||||
return "";
|
||||
_code?>
|
||||
<=LOAD_PAGE_INFO
|
||||
|
||||
AL=>{P}<i><a href="%%data1%%">%%data2%%</a></i> <img src="/img/external_link.gif" width='16' height='11' align='absmiddle' />
|
||||
AWAYLINK=>{P}<i><a href="%%data1%%">%%data2%%</a></i> <img src="/img/external_link.gif" width='16' height='11' align='absmiddle' />
|
||||
|
||||
H1=>{D}<h1>%%data%%</h1>
|
||||
H2=>{D}<h2>%%data%%</h2>
|
||||
|
||||
# Banner Header: search results banner, content desriptor, etc...
|
||||
BH=>{D}<p align='center'><font face="Arial,Helvetica" color="#CC0000" size='-1'><b>%%data%%</b></font>
|
||||
|
||||
GRIN=>{S}<grin>
|
||||
HR=>{S}<hr />
|
||||
|
||||
NEWLINE=>{S}<BR>
|
||||
P=>{D}<P>%%data%%</P>
|
||||
|
||||
STANDOUT<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=STANDOUT
|
||||
|
||||
ERRORBAR<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=ERRORBAR
|
||||
|
||||
WARNINGBAR<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=WARNINGBAR
|
||||
|
||||
BADCONTENT<=
|
||||
<?h1 <?_ml Error _ml?> h1?>
|
||||
<?p <?_ml bml.badcontent.body _ml?> p?>
|
||||
<=BADCONTENT
|
||||
|
||||
DE<=
|
||||
%%data%%
|
||||
<=DE
|
||||
|
||||
EMCOLOR=>{S}#c0c0c0
|
||||
HOTCOLOR=>{S}#ff0000
|
||||
EMCOLORLITE=>{S}#e2e2e2
|
||||
ALTCOLOR1=>{S}#eeeeee
|
||||
ALTCOLOR2=>{S}#dddddd
|
||||
screenedbarcolor=>{S}#d0d0d0
|
||||
|
||||
CHOICE=>{P}<dt><a href="%%data2%%"><font size="+1"><tt><b>%%data1%%</b></tt></font></a><dd><font size="2">%%data3%%</font>
|
||||
|
||||
CHOICES<=
|
||||
{F}<table width="100%" cellpadding="2" cellspacing="5">
|
||||
<tr>
|
||||
<td valign='top' width="50%">
|
||||
<dl>
|
||||
%%items%%
|
||||
</dl>
|
||||
</td>
|
||||
<td valign='top' width="50%">
|
||||
<dl>
|
||||
%%itemsb%%
|
||||
</dl>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
<=CHOICES
|
||||
|
||||
PAGE<=
|
||||
{Fp}<html>
|
||||
<head><title>%%title%%</title>%%head%%</head>
|
||||
<body %%bodyopts%%>
|
||||
%%body%%
|
||||
</body>
|
||||
</html>
|
||||
<=PAGE
|
||||
|
||||
BREADCRUMBS<=
|
||||
{Fp}<?_code
|
||||
# where are we
|
||||
my @crumbs = LJ::get_crumb_path();
|
||||
return unless @crumbs;
|
||||
my @ret;
|
||||
my $count = 0;
|
||||
foreach my $crumb (@crumbs) {
|
||||
# put crumbs together
|
||||
next unless $crumb->[3]; # no blank crumbs
|
||||
if ($crumb->[3] eq 'dynamic') {
|
||||
# dynamic
|
||||
unshift @ret, "<b>$crumb->[0]</b>";
|
||||
$count++;
|
||||
} else {
|
||||
# non-dynamic
|
||||
unshift @ret, $count++ == 0 ?
|
||||
"<b>$ML{'crumb.'.$crumb->[3]}</b>" :
|
||||
$crumb->[1] ne '' ?
|
||||
"<a href=\"$crumb->[1]\">$ML{'crumb.'.$crumb->[3]}</a>" :
|
||||
"$ML{'crumb.'.$crumb->[3]}";
|
||||
}
|
||||
}
|
||||
return "<div id='ljbreadcrumbs'>" . join(" : ", @ret) . "</div>";
|
||||
_code?>
|
||||
<=BREADCRUMBS
|
||||
374
local/cgi-bin/bml/scheme/ljr.look
Executable file
374
local/cgi-bin/bml/scheme/ljr.look
Executable file
@@ -0,0 +1,374 @@
|
||||
_parent=>../../lj-bml-blocks.pl
|
||||
|
||||
loginboxstyle=>{Ss}background: url(<?imgprefix?>/userinfo.gif) no-repeat; background-color: #fff; background-position: 0px 1px; padding-left: 18px; color: #00C; font-weight: bold;
|
||||
commloginboxstyle=>{Ss}background: url(<?imgprefix?>/community.gif) no-repeat; background-color: #fff; background-position: 0px 2px; padding-left: 19px; color: #00C; font-weight: bold;
|
||||
|
||||
SECURITYPRIVATE=>{Ss}<img src="<?imgprefix?>/icon_private.gif" width=16 height=16 align=absmiddle>
|
||||
SECURITYPROTECTED=>{Ss}<img src="<?imgprefix?>/icon_protected.gif" width=14 height=15 align=absmiddle>
|
||||
LJUSER=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%'><img src='<?imgprefix?>/userinfo.gif' alt='userinfo' width='17' height='17' style='vertical-align:bottom;border:0;' /></a><a href='/users/%%data%%/'><b>%%data%%</b></a></span>
|
||||
LJCOMM=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%'><img src='<?imgprefix?>/community.gif' alt='userinfo' width='16' height='16' style='vertical-align:bottom;border:0;' /></a><a href='/community/%%data%%/'><b>%%data%%</b></a></span>
|
||||
LJUSERF=>{DRs}<span class='ljuser' style='white-space:nowrap;'><a href='/userinfo.bml?user=%%data%%&mode=full'><img src='<?imgprefix?>/userinfo.gif' alt='userinfo' width='17' height='17' style='vertical-align:bottom;border:0;' /></a><a href='/users/%%data%%/'><b>%%data%%</b></a></span>
|
||||
HELP=>{DR}(<a href="%%data%%"><i>help</i></a>)
|
||||
INERR=>{DR}<font color="#ff0000"><b>%%data%%</b></font>
|
||||
SOERROR=>{DR}<div><b>%%data%%</b></div>
|
||||
EMAILEX=><div style='font-family: courier; border: solid black 1px; padding: 5px;'>%%data%%</div>
|
||||
|
||||
ENTRYFORMCSS<=
|
||||
{Ss}
|
||||
<style type="text/css">
|
||||
#EntryForm #MetaInfo {
|
||||
width: 100%;
|
||||
}
|
||||
#EntryForm th {
|
||||
font-size: 1em;
|
||||
}
|
||||
#EntryForm #SubmitBar {
|
||||
background-color: #dfdfdf;
|
||||
padding: 5px;
|
||||
text-align: center;
|
||||
border: 1px outset #000;
|
||||
margin-left: auto; margin-right: auto;
|
||||
}
|
||||
#MetaInfo tr {
|
||||
padding-bottom: 10px;
|
||||
}
|
||||
#metainfo th {
|
||||
text-align: left;
|
||||
}
|
||||
#mood_preview {
|
||||
display: none;
|
||||
}
|
||||
#datetime_box input, #datetime_box select {
|
||||
margin-right: 2px;
|
||||
}
|
||||
#EntryForm legend {
|
||||
font-weight: bold;
|
||||
}
|
||||
#EntryForm #Options {
|
||||
margin-left: 0; margin-right: 0; padding: 0;
|
||||
background-color: #dfdfdf;
|
||||
border: 1px outset #000;
|
||||
}
|
||||
#EntryForm #Options th {
|
||||
text-align: left;
|
||||
}
|
||||
#EntryForm #infobox {
|
||||
text-align: center;
|
||||
}
|
||||
#EntryForm #infobox table {
|
||||
background-color: #dfdfdf;
|
||||
border: 2px solid <?emcolor?>;
|
||||
}
|
||||
#EntryForm textarea {
|
||||
border: 1px inset #000;
|
||||
padding: 2px;
|
||||
}
|
||||
#EntryForm #Security option {
|
||||
padding-left: 18px;
|
||||
}
|
||||
#EntryForm #security_public {
|
||||
background-image: url("<?imgprefix?>/userinfo.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #security_private {
|
||||
background-image: url("<?imgprefix?>/icon_private.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #security_friends, #EntryForm #security_custom {
|
||||
background-image: url("<?imgprefix?>/icon_protected.gif");
|
||||
background-repeat: no-repeat;
|
||||
}
|
||||
#EntryForm #UserpicPreviewImage {
|
||||
border: 1px solid #000;
|
||||
}
|
||||
#EntryForm {
|
||||
width: 100%;
|
||||
}
|
||||
</style>
|
||||
<=ENTRYFORMCSS
|
||||
|
||||
NEEDLOGIN<=
|
||||
<?h1 <?_ml bml.needlogin.head _ml?> h1?>
|
||||
<?p <?_ml bml.needlogin.body2 _ml?> p?>
|
||||
<=NEEDLOGIN
|
||||
|
||||
BADINPUT<=
|
||||
<?h1 <?_ml bml.badinput.head _ml?> h1?>
|
||||
<?p <?_ml bml.badinput.body _ml?> p?>
|
||||
<=BADINPUT
|
||||
|
||||
REQUIREPOST=><?_ml bml.requirepost _ml?>
|
||||
|
||||
LOAD_PAGE_INFO<=
|
||||
<?_code
|
||||
#line 3
|
||||
@sidebar = ({ 'name' => 'Home',
|
||||
'uri' => '/',
|
||||
'match' => "^/(index\\.bml)?(\\?.*)?\$",
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.create'),
|
||||
'uri' => '/create.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.update'),
|
||||
'uri' => '/update.bml',
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.fullupdate'),
|
||||
'uri' => '/update.bml?mode=full', }
|
||||
],
|
||||
},
|
||||
# { 'name' => 'Download',
|
||||
# 'uri' => '/download/', },
|
||||
],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.site'),
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.news'),
|
||||
'match' => '^/news\\.bml\$',
|
||||
'uri' => '/community/ljr_news/', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.siteopts'),
|
||||
'uri' => '/manage/siteopts.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.paidaccounts'),
|
||||
'uri' => '/paidaccounts/',
|
||||
# 'recursematch' => '^/paidaccounts/',
|
||||
# 'children' => [
|
||||
# { 'name' => 'Is this safe?',
|
||||
# 'uri' => '/paidaccounts/whysafe.bml', },
|
||||
# { 'name' => 'Progress',
|
||||
# 'uri' => '/paidaccounts/progress.bml', },
|
||||
# ],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.ljfif'),
|
||||
'uri' => '/users/ljr_fif/friends', },
|
||||
# { 'name' => 'To-Do list',
|
||||
# 'uri' => '/todo.bml', },
|
||||
# { 'name' => 'Contributors',
|
||||
# 'uri' => '/contributors.bml', },
|
||||
],
|
||||
},
|
||||
# { 'name' => 'Find Users',
|
||||
# 'children' => [
|
||||
# { 'name' => 'Random!',
|
||||
# 'uri' => '/random.bml', },
|
||||
# { 'name' => 'By Region',
|
||||
# 'uri' => '/directory.bml', },
|
||||
# { 'name' => 'By Interest',
|
||||
# 'uri' => '/interests.bml', },
|
||||
# { 'name' => 'Search',
|
||||
# 'uri' => '/directorysearch.bml', }
|
||||
# ], },
|
||||
{ 'name' => BML::ml('ljrlook.nav.edit'),
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.editinfo'),
|
||||
'uri' => '/editinfo.bml', },
|
||||
# { 'name' => 'Settings', cont => 1,
|
||||
# 'uri' => '/editinfo.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.editfriends'),
|
||||
'uri' => '/editfriends.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.editjournal'),
|
||||
'uri' => '/editjournal.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.editpics'),
|
||||
'uri' => '/editpics.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.changepassword'),
|
||||
'uri' => '/changepassword.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.modify'),
|
||||
'uri' => '/modify.bml', },
|
||||
],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.communities.manage'),
|
||||
'uri' => '/community/manage.bml'
|
||||
},
|
||||
# { 'name' => 'Developer Area',
|
||||
# 'uri' => '/developer/',
|
||||
# 'match' => "^/developer/\$",
|
||||
# 'recursematch' => "^/developer/",
|
||||
# 'children' => [
|
||||
# { 'name' => 'Style System',
|
||||
# 'uri' => '/developer/styles.bml',
|
||||
# 'children' => [
|
||||
# { 'name' => 'View Types',
|
||||
# 'uri' => '/developer/views.bml', },
|
||||
# { 'name' => 'Variable List',
|
||||
# 'uri' => '/developer/varlist.bml', },
|
||||
# ],
|
||||
# },
|
||||
# { 'name' => 'Embedding',
|
||||
# 'uri' => '/developer/embedding.bml', },
|
||||
# { 'name' => 'Protocol',
|
||||
# 'uri' => '/developer/protocol.bml',
|
||||
# 'children' => [
|
||||
# { 'name' => 'Mode List',
|
||||
# 'uri' => '/developer/modelist.bml', }
|
||||
# ],
|
||||
# },
|
||||
# ],
|
||||
# },
|
||||
{ 'name' => BML::ml('ljrlook.nav.frills'),#Styles,customization
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.customize'),
|
||||
'uri' => '/customize/', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.createstyle'),
|
||||
'uri' => '/createstyle.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.editstyle'),
|
||||
'uri' => '/editstyle.bml', },
|
||||
],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.needhelp'),
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.lostinfo'),
|
||||
'uri' => '/lostinfo.bml', },
|
||||
{ 'name' => BML::ml('ljrlook.nav.support.faq'),
|
||||
'uri' => '/support/faq.bml', },
|
||||
# { 'name' => 'Questions',
|
||||
# 'uri' => '/support/faq.bml', cont => 1, },
|
||||
{ 'name' => BML::ml('ljrlook.nav.support'),
|
||||
'uri' => '/support/', },
|
||||
],
|
||||
},
|
||||
);
|
||||
|
||||
my $remote = LJ::get_remote();
|
||||
my $remuser = $remote ? $remote->{'user'} : "";
|
||||
my $uri = BML::get_uri();
|
||||
if ($remuser ne "" && $uri ne "/logout.bml")
|
||||
{
|
||||
my $subdomain = $remuser;
|
||||
$subdomain =~ s/_/-/g;
|
||||
unshift @sidebar, { 'name' => BML::ml('ljrlook.nav.hello').", ".$remuser."!",
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.yourjournal'),
|
||||
'children' => [
|
||||
{ 'name' => BML::ml('ljrlook.nav.recent'),
|
||||
'uri' => "/users/$remuser/", },
|
||||
{ 'name' => BML::ml('ljrlook.nav.calendar'),
|
||||
'uri' => "/users/$remuser/calendar", },
|
||||
{ 'name' => BML::ml('ljrlook.nav.friends'),
|
||||
'uri' => "/users/$remuser/friends",
|
||||
'extra' => "/friendsfilter.bml",
|
||||
},
|
||||
],
|
||||
},
|
||||
{ 'name' => BML::ml('ljrlook.nav.userinfo'),
|
||||
'uri' => "/userinfo.bml?user=$remuser", },
|
||||
{ 'name' => BML::ml('ljrlook.nav.memories'),
|
||||
'uri' => "/memories.bml?user=$remuser", },
|
||||
{ 'name' => BML::ml('ljrlook.nav.logout'),
|
||||
'uri' => '/logout.bml', },
|
||||
]
|
||||
};
|
||||
} elsif ($uri ne "/login.bml") {
|
||||
unshift @sidebar, { 'name' => BML::ml('ljrlook.nav.login'),,
|
||||
'uri' => '/login.bml', }
|
||||
}
|
||||
|
||||
return "";
|
||||
_code?>
|
||||
<=LOAD_PAGE_INFO
|
||||
|
||||
AL=>{P}<i><a href="%%data1%%">%%data2%%</a></i> <img src="/img/external_link.gif" width='16' height='11' align='absmiddle' />
|
||||
AWAYLINK=>{P}<i><a href="%%data1%%">%%data2%%</a></i> <img src="/img/external_link.gif" width='16' height='11' align='absmiddle' />
|
||||
|
||||
H1=>{D}<h1>%%data%%</h1>
|
||||
H2=>{D}<h2>%%data%%</h2>
|
||||
|
||||
# Banner Header: search results banner, content desriptor, etc...
|
||||
BH=>{D}<p align='center'><font face="Arial,Helvetica" color="#CC0000" size='-1'><b>%%data%%</b></font>
|
||||
|
||||
GRIN=>{S}<grin>
|
||||
HR=>{S}<hr />
|
||||
|
||||
NEWLINE=>{S}<BR>
|
||||
P=>{D}<P>%%data%%</P>
|
||||
|
||||
STANDOUT<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=STANDOUT
|
||||
|
||||
ERRORBAR<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=ERRORBAR
|
||||
|
||||
WARNINGBAR<=
|
||||
{D}<blockquote>
|
||||
<hr />
|
||||
%%data%%
|
||||
<hr />
|
||||
</blockquote>
|
||||
<=WARNINGBAR
|
||||
|
||||
BADCONTENT<=
|
||||
<?h1 <?_ml Error _ml?> h1?>
|
||||
<?p <?_ml bml.badcontent.body _ml?> p?>
|
||||
<=BADCONTENT
|
||||
|
||||
DE<=
|
||||
%%data%%
|
||||
<=DE
|
||||
|
||||
EMCOLOR=>{S}#c0c0c0
|
||||
HOTCOLOR=>{S}#ff0000
|
||||
EMCOLORLITE=>{S}#e2e2e2
|
||||
ALTCOLOR1=>{S}#eeeeee
|
||||
ALTCOLOR2=>{S}#dddddd
|
||||
screenedbarcolor=>{S}#d0d0d0
|
||||
|
||||
CHOICE=>{P}<dt><a href="%%data2%%"><font size="+1"><tt><b>%%data1%%</b></tt></font></a><dd><font size="2">%%data3%%</font>
|
||||
|
||||
CHOICES<=
|
||||
{F}<table width="100%" cellpadding="2" cellspacing="5">
|
||||
<tr>
|
||||
<td valign='top' width="50%">
|
||||
<dl>
|
||||
%%items%%
|
||||
</dl>
|
||||
</td>
|
||||
<td valign='top' width="50%">
|
||||
<dl>
|
||||
%%itemsb%%
|
||||
</dl>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
<=CHOICES
|
||||
|
||||
PAGE<=
|
||||
{Fp}<html>
|
||||
<head><title>%%title%%</title>%%head%%</head>
|
||||
<body %%bodyopts%%>
|
||||
%%body%%
|
||||
</body>
|
||||
</html>
|
||||
<=PAGE
|
||||
|
||||
BREADCRUMBS<=
|
||||
{Fp}<?_code
|
||||
# where are we
|
||||
my @crumbs = LJ::get_crumb_path();
|
||||
return unless @crumbs;
|
||||
my @ret;
|
||||
my $count = 0;
|
||||
foreach my $crumb (@crumbs) {
|
||||
# put crumbs together
|
||||
next unless $crumb->[3]; # no blank crumbs
|
||||
if ($crumb->[3] eq 'dynamic') {
|
||||
# dynamic
|
||||
unshift @ret, "<b>$crumb->[0]</b>";
|
||||
$count++;
|
||||
} else {
|
||||
# non-dynamic
|
||||
unshift @ret, $count++ == 0 ?
|
||||
"<b>$ML{'crumb.'.$crumb->[3]}</b>" :
|
||||
$crumb->[1] ne '' ?
|
||||
"<a href=\"$crumb->[1]\">$ML{'crumb.'.$crumb->[3]}</a>" :
|
||||
"$ML{'crumb.'.$crumb->[3]}";
|
||||
}
|
||||
}
|
||||
return "<div id='ljbreadcrumbs'>" . join(" : ", @ret) . "</div>";
|
||||
_code?>
|
||||
<=BREADCRUMBS
|
||||
225
local/cgi-bin/bml/scheme/opalcat.look
Executable file
225
local/cgi-bin/bml/scheme/opalcat.look
Executable file
@@ -0,0 +1,225 @@
|
||||
_parent=>global.look
|
||||
|
||||
AL=>{P}<I><A HREF="%%DATA1%%">%%DATA2%%</A></I> <IMG SRC="<?imgprefix?>/external_link.gif" WIDTH=16 HEIGHT=11 ALIGN=ABSMIDDLE>
|
||||
AWAYLINK=>{P}<I><A HREF="%%DATA1%%">%%DATA2%%</A></I> <IMG SRC="<?imgprefix?>/external_link.gif" WIDTH=16 HEIGHT=11 ALIGN=ABSMIDDLE>
|
||||
|
||||
H1=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
H1/FOLLOW_CHOICES=>{D}<FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
HEAD1=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
|
||||
H2=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
HEAD2=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
|
||||
# Banner Header: search results banner, content desriptor, etc...
|
||||
BH=>{D}<P ALIGN=CENTER><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
|
||||
GRIN=><grin>
|
||||
HR=><P ALIGN="CENTER"><FONT COLOR=BLUE>*</FONT></P>
|
||||
|
||||
DE<=
|
||||
<font size=-1>%%DATA%%</font>
|
||||
<=DE
|
||||
|
||||
NEWLINE=>{D}<BR>
|
||||
P=>{D}<BR>%%DATA%%
|
||||
P/FOLLOW_P=>{D}<BR><IMG SRC="<?imgprefix?>/dot.gif" WIDTH=1 VSPACE=6 HEIGHT=1><BR>%%DATA%%
|
||||
|
||||
STANDOUTO<=
|
||||
{D}<CENTER><FONT SIZE=1><BR></FONT><TABLE ALIGN=CENTER CELLPADDING=8 BORDER=1 BGCOLOR=#CCCCFF BORDERCOLORLIGHT=#DDDDFF
|
||||
BORDERCOLORDARK=#BBBBFF><TR><TD VALIGN=CENTER>
|
||||
%%DATA%%
|
||||
|
||||
</TD></TR></TABLE></CENTER>
|
||||
<=STANDOUTO
|
||||
|
||||
STANDOUT<=
|
||||
{D}<CENTER><FONT SIZE=1><BR></FONT>
|
||||
<table cellspacing=0 cellpadding=0 border=0 bgcolor="#ccccff">
|
||||
<tr>
|
||||
<td width=7 align=left valign=top>
|
||||
<img width=7 height=7 src="<?imgprefix?>/corn_nw.gif" alt=""></td>
|
||||
<td height=7>
|
||||
<img height=7 src="<?imgprefix?>/dot.gif" alt=""></td>
|
||||
<td width=7 valign=top align=right>
|
||||
<img height=7 src="<?imgprefix?>/corn_ne.gif" alt=""></td>
|
||||
</tr><tr>
|
||||
<td width=7>
|
||||
<img width=7 height=1 src="<?imgprefix?>/dot.gif" alt=""></td>
|
||||
<td valign=top>
|
||||
%%DATA%%
|
||||
|
||||
</td>
|
||||
<td width=7>
|
||||
<img width=7 height=1 src="<?imgprefix?>/dot.gif" alt=""></td>
|
||||
</tr><tr>
|
||||
<td width=7 align=left valign=top>
|
||||
<img width=7 height=7 src="<?imgprefix?>/corn_sw.gif" alt=""></td>
|
||||
<td height=7>
|
||||
<img height=7 src="<?imgprefix?>/dot.gif" alt=""></td>
|
||||
<td width=7 valign=top align=right>
|
||||
<img height=7 src="<?imgprefix?>/corn_se.gif" alt=""></td>
|
||||
</tr>
|
||||
</table>
|
||||
|
||||
</CENTER>
|
||||
<=STANDOUT
|
||||
|
||||
######################### choices stuff
|
||||
|
||||
CHOICE=>{P}<DT><A HREF="%%DATA2%%"><FONT FACE="Arial,Helvetica"><B>%%DATA1%%</B></FONT></A><DD><FONT SIZE="2">%%DATA3%%</FONT>
|
||||
|
||||
CHOICES<=
|
||||
{F}<P><DIV CLASS="choice"><TABLE WIDTH="100%" CELLPADDING="2" CELLSPACING="5">
|
||||
<TR>
|
||||
<TD VALIGN=TOP WIDTH="50%">
|
||||
<DL>
|
||||
%%ITEMS%%
|
||||
</DL>
|
||||
</TD>
|
||||
<TD VALIGN=TOP WIDTH="50%">
|
||||
<DL>
|
||||
%%ITEMSB%%
|
||||
</DL>
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE></DIV>
|
||||
<=CHOICES
|
||||
|
||||
##################################################################################
|
||||
################################### MAIN PAGE ####################################
|
||||
##################################################################################
|
||||
|
||||
PAGE<=
|
||||
{F}<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">
|
||||
<HTML><?load_page_info?>
|
||||
<HEAD>
|
||||
<LINK REL="SHORTCUT ICON" HREF="http://www.livejournal.com/favicon.ico">
|
||||
<TITLE>%%TITLE%%</TITLE>
|
||||
%%HEAD%%
|
||||
<SCRIPT LANGUAGE="JavaScript">
|
||||
window.onerror = null; // damn javascript.
|
||||
</SCRIPT>
|
||||
</HEAD>
|
||||
<BODY BGCOLOR=#FFFFFF TOPMARGIN="0" LEFTMARGIN="0" RIGHTMARGIN="0" BOTTOMMARGIN="0"
|
||||
MARGINHEIGHT="0" MARGINWIDTH="0" LINK=#0000C0 VLINK=#600060
|
||||
BACKGROUND="<?imgprefix?>/opal/spiral2.jpg" %%bodyopts%%>
|
||||
|
||||
<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0 WIDTH=100% HEIGHT=100%>
|
||||
<TR VALIGN=TOP>
|
||||
<TD WIDTH=128 NOWRAP>
|
||||
|
||||
<IMG SRC="<?imgprefix?>/dot.gif" WIDTH=1 HEIGHT=15><BR>
|
||||
|
||||
<FONT FACE="Arial,Helvetica" SIZE=-1>
|
||||
<?_code
|
||||
|
||||
$ret = "";
|
||||
|
||||
sub dump_entry
|
||||
{
|
||||
my ($ret, $listref, $depth) = @_;
|
||||
|
||||
foreach my $mi (@$listref)
|
||||
{
|
||||
if ($depth==0) {
|
||||
$$ret .= "<P><IMG SRC=\"<?imgprefix?>/opal/bullet.gif\" WIDTH=10 HEIGHT=10 HSPACE=2 ALIGN=ABSMIDDLE>";
|
||||
} else {
|
||||
$$ret .= " " x ($depth*3+1);
|
||||
$$ret .= $mi->{'cont'} ? " " : "- ";
|
||||
}
|
||||
|
||||
my $extra = "";
|
||||
if ($mi->{'extra'}) {
|
||||
$extra = " <A HREF=\"$mi->{'extra'}\">...</A>";
|
||||
}
|
||||
|
||||
my $name = $mi->{'name'};
|
||||
$name =~ s/ / /g;
|
||||
if (! defined $mi->{'uri'}) {
|
||||
if ($depth == 0) {
|
||||
$$ret .= "<B>$name</B>$extra<BR>";
|
||||
} else {
|
||||
$$ret .= "$name$extra<BR>";
|
||||
}
|
||||
} elsif ($mi->{'match'} ?
|
||||
(BML::get_uri() =~ /$mi->{'match'}/) :
|
||||
(BML::get_uri() eq $mi->{'uri'})
|
||||
){
|
||||
$$ret .= "<B><SPAN style=\"background-color: #D0D0FF\"><FONT COLOR=#0000D0>$name</FONT></SPAN></B>$extra<BR>";
|
||||
} else {
|
||||
$$ret .= "<A HREF=\"$mi->{'uri'}\">$name</A>$extra<BR>";
|
||||
}
|
||||
|
||||
if ($mi->{'children'} &&
|
||||
($mi->{'recursematch'} ? BML::get_uri() =~ /$mi->{'recursematch'}/ : 1)) {
|
||||
&dump_entry($ret, $mi->{'children'}, $depth+1);
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
&dump_entry(\$ret, \@sidebar, 0);
|
||||
|
||||
return $ret;
|
||||
|
||||
_code?>
|
||||
</FONT>
|
||||
|
||||
</TD>
|
||||
<TD ALIGN=LEFT WIDTH=39 NOWRAP><BR></TD>
|
||||
|
||||
</TD>
|
||||
<TD WIDTH=100%>
|
||||
|
||||
<TABLE HEIGHT=95 WIDTH=100% BORDER=0 cellpadding=0 cellspacing=0>
|
||||
<TR>
|
||||
<TD VALIGN=TOP ALIGN=RIGHT>
|
||||
<?_code
|
||||
$is_home = (BML::get_uri() =~ m!^/(index\.bml)?!);
|
||||
if (! $is_home)
|
||||
{
|
||||
return '<P><A HREF="/"><IMG SRC="<?imgprefix?>/opal/home.gif" WIDTH=87 HEIGHT=51 BORDER=0 HSPACE=0></A></P>';
|
||||
} else {
|
||||
return "<P> </P>";
|
||||
}
|
||||
return "";
|
||||
_code?>
|
||||
|
||||
<P align=left><FONT SIZE=6 COLOR="#000a3f" FACE="Arial, Helvetica"><B>%%TITLE%%</B></FONT>
|
||||
<BR><IMG SRC="<?imgprefix?>/opal/pencil-line.gif" WIDTH=345 HEIGHT=23></P>
|
||||
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
|
||||
|
||||
<IMG SRC="<?imgprefix?>/dot.gif" WIDTH=1 HEIGHT=5><BR>
|
||||
|
||||
<TABLE WIDTH=100%>
|
||||
<TR><TD ALIGN=LEFT>
|
||||
%%BODY%%
|
||||
</TD>
|
||||
<TD WIDTH=20> </TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
|
||||
</TD>
|
||||
</TR>
|
||||
|
||||
<TR ALIGN=RIGHT>
|
||||
<TD> </TD><TD> </TD>
|
||||
<TD>
|
||||
<P> <P>
|
||||
<FONT FACE="Arial, Helvetica" SIZE="-2">
|
||||
<A HREF="/tos.html">Terms of Service</A><BR>
|
||||
<A HREF="/privacy.bml">Privacy Policy</A> -
|
||||
<A HREF="/legal/coppa.bml">COPPA</A>
|
||||
</FONT>
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
|
||||
</BODY>
|
||||
</HTML>
|
||||
<=PAGE
|
||||
|
||||
267
local/cgi-bin/bml/scheme/redwhite.look
Executable file
267
local/cgi-bin/bml/scheme/redwhite.look
Executable file
@@ -0,0 +1,267 @@
|
||||
#
|
||||
# Welcome to GENERIC.LOOK for the WhiteBlue scheme
|
||||
#
|
||||
# by....
|
||||
# Brad Fitzpatrick
|
||||
# brad@danga.com
|
||||
#
|
||||
|
||||
######################### little stuff
|
||||
|
||||
_parent=>global.look
|
||||
|
||||
AL=>{P}<I><A HREF="%%DATA1%%">%%DATA2%%</A></I> <IMG SRC="/img/external_link.gif" WIDTH=16 HEIGHT=11 ALIGN=ABSMIDDLE>
|
||||
AWAYLINK=>{P}<I><A HREF="%%DATA1%%">%%DATA2%%</A></I> <IMG SRC="/img/external_link.gif" WIDTH=16 HEIGHT=11 ALIGN=ABSMIDDLE>
|
||||
|
||||
H1=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
H1/FOLLOW_CHOICES=>{D}<FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
HEAD1=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000"><B>%%DATA%%</B></FONT>
|
||||
|
||||
H2=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
HEAD2=>{D}<P><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
|
||||
# Banner Header: search results banner, content desriptor, etc...
|
||||
BH=>{D}<P ALIGN=CENTER><FONT FACE="Arial,Helvetica" COLOR="#CC0000" SIZE=-1><B>%%DATA%%</B></FONT>
|
||||
|
||||
GRIN=><grin>
|
||||
HR=><P ALIGN="CENTER"><FONT COLOR=BLUE>*</FONT></P>
|
||||
|
||||
NEWLINE=>{D}<BR>
|
||||
P=>{D}<BR>%%DATA%%
|
||||
P/FOLLOW_P=>{D}<BR><IMG SRC="/img/dot.gif" WIDTH=1 VSPACE=6 HEIGHT=1><BR>%%DATA%%
|
||||
|
||||
STANDOUTO<=
|
||||
{D}<CENTER><FONT SIZE=1><BR></FONT><TABLE ALIGN=CENTER CELLPADDING=8 BORDER=1 BGCOLOR=#CCCCFF BORDERCOLORLIGHT=#DDDDFF
|
||||
BORDERCOLORDARK=#BBBBFF><TR><TD VALIGN=CENTER>
|
||||
%%DATA%%
|
||||
|
||||
</TD></TR></TABLE></CENTER>
|
||||
<=STANDOUTO
|
||||
|
||||
STANDOUT<=
|
||||
{D}<CENTER><FONT SIZE=1><BR></FONT>
|
||||
<table cellspacing=0 cellpadding=0 border=0 bgcolor="#ccccff">
|
||||
<tr>
|
||||
<td width=7 align=left valign=top>
|
||||
<img width=7 height=7 src="/img/corn_nw.gif" alt=""></td>
|
||||
<td height=7>
|
||||
<img height=7 src="/img/dot.gif" alt=""></td>
|
||||
<td width=7 valign=top align=right>
|
||||
<img height=7 src="/img/corn_ne.gif" alt=""></td>
|
||||
</tr><tr>
|
||||
<td width=7>
|
||||
<img width=7 height=1 src="/img/dot.gif" alt=""></td>
|
||||
<td valign=top>
|
||||
%%DATA%%
|
||||
|
||||
</td>
|
||||
<td width=7>
|
||||
<img width=7 height=1 src="/img/dot.gif" alt=""></td>
|
||||
</tr><tr>
|
||||
<td width=7 align=left valign=top>
|
||||
<img width=7 height=7 src="/img/corn_sw.gif" alt=""></td>
|
||||
<td height=7>
|
||||
<img height=7 src="/img/dot.gif" alt=""></td>
|
||||
<td width=7 valign=top align=right>
|
||||
<img height=7 src="/img/corn_se.gif" alt=""></td>
|
||||
</tr>
|
||||
</table>
|
||||
|
||||
</CENTER>
|
||||
<=STANDOUT
|
||||
SOERROR=><div style='background-color:#f3f4fe; color:red; font-weight:bold; text-align:center'>%%data%%</div>
|
||||
EMAILEX=><div style='width: 50%; font-family: courier; background-color: #efefef; border: dotted #cdcdcd 2px; padding: 5px;'>%%data%%</div>
|
||||
|
||||
######################### choices stuff
|
||||
|
||||
CHOICE=>{P}<DT><A HREF="%%DATA2%%"><FONT FACE="Arial,Helvetica"><B>%%DATA1%%</B></FONT></A><DD><FONT SIZE="2">%%DATA3%%</FONT>
|
||||
|
||||
CHOICES<=
|
||||
{F}<P><DIV CLASS="choice"><TABLE WIDTH="100%" CELLPADDING="2" CELLSPACING="5">
|
||||
<TR>
|
||||
<TD VALIGN=TOP WIDTH="50%">
|
||||
<DL>
|
||||
%%ITEMS%%
|
||||
</DL>
|
||||
</TD>
|
||||
<TD VALIGN=TOP WIDTH="50%">
|
||||
<DL>
|
||||
%%ITEMSB%%
|
||||
</DL>
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE></DIV>
|
||||
<=CHOICES
|
||||
|
||||
##################################################################################
|
||||
################################### MAIN PAGE ####################################
|
||||
##################################################################################
|
||||
|
||||
PAGE<=
|
||||
{Fps}<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">
|
||||
<HTML><?load_page_info?>
|
||||
<HEAD>
|
||||
<title><?_code {
|
||||
my $elhash = $_[2];
|
||||
return $elhash->{'WINDOWTITLE'} || $elhash->{'TITLE'};
|
||||
} _code?></title>
|
||||
%%head%%
|
||||
<?_code
|
||||
use strict;
|
||||
my $crumb_up;
|
||||
if(LJ::get_active_crumb() ne '')
|
||||
{
|
||||
my $parentcrumb = LJ::get_parent_crumb();
|
||||
$crumb_up = "<link rel='up' title='$parentcrumb->[0]' href='$parentcrumb->[1]' />";
|
||||
}
|
||||
return $crumb_up;
|
||||
_code?>
|
||||
</HEAD>
|
||||
|
||||
<BODY BGCOLOR=#FFFFFF TOPMARGIN="0" LEFTMARGIN="0" MARGINHEIGHT="0" MARGINWIDTH="0" LINK=#0000C0 VLINK=#600060 %%bodyopts%%>
|
||||
|
||||
<TABLE WIDTH=100% BORDER=0 CELLPADDING=0 CELLSPACING=0 BACKGROUND="/img/bluewhite/bluefade.jpg">
|
||||
<TR WIDTH=100%>
|
||||
<TD VALIGN=BOTTOM ALIGN=LEFT HEIGHT=100>
|
||||
|
||||
<TABLE BACKGROUND="" HEIGHT=95 WIDTH=100% BORDER=0>
|
||||
<TR>
|
||||
<TD WIDTH=3> </TD>
|
||||
<TD HEIGHT=53 WIDTH=406 VALIGN=BOTTOM>
|
||||
<?_code
|
||||
$is_home = (BML::get_uri() =~ m!^/(index\.bml)?!);
|
||||
if (0 && $is_home)
|
||||
{
|
||||
return '<IMG SRC="/img/bluewhite/title.gif" WIDTH=600 HEIGHT=53><!-- ';
|
||||
}
|
||||
return "";
|
||||
_code?>
|
||||
|
||||
<FONT SIZE=6 COLOR="#000a3f" FACE="Arial, Helvetica"><B>%%TITLE%%</B></FONT>
|
||||
|
||||
<?_code
|
||||
if (0 && $is_home)
|
||||
{
|
||||
return ' -->';
|
||||
}
|
||||
return "";
|
||||
_code?>
|
||||
|
||||
</TD>
|
||||
<TD VALIGN=TOP ALIGN=RIGHT>
|
||||
<?_code
|
||||
unless ($is_home) {
|
||||
return "<A HREF=\"/\"><IMG SRC=\"/img/bluewhite/home.gif\" WIDTH=35 HEIGHT=36 BORDER=0></A> ";
|
||||
}
|
||||
return "";
|
||||
_code?>
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
|
||||
</TD></TR>
|
||||
<TR><TD bgcolor="#FFFFFF"><?breadcrumbs?></TD></TR>
|
||||
</TABLE>
|
||||
|
||||
<TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>
|
||||
<TR VALIGN=TOP>
|
||||
<TD WIDTH=155 BGCOLOR=#d7d9e8 NOWRAP><IMG SRC="/img/bluewhite/hline.gif" WIDTH=155 HEIGHT=25 ALT="">
|
||||
|
||||
<TABLE WIDTH=153 BORDER=0 CELLSPACING=0 CELLPADDING=0>
|
||||
<TR><TD>
|
||||
|
||||
<FONT FACE="Arial,Helvetica" SIZE=-1>
|
||||
<?_code
|
||||
|
||||
$ret = "";
|
||||
|
||||
sub dump_entry
|
||||
{
|
||||
my ($ret, $listref, $depth) = @_;
|
||||
|
||||
foreach my $mi (@$listref)
|
||||
{
|
||||
if ($depth==0) {
|
||||
$$ret .= "<P><IMG SRC=\"/img/bluewhite/bullet.gif\" WIDTH=10 HEIGHT=10 HSPACE=2 ALIGN=ABSMIDDLE>";
|
||||
} else {
|
||||
$$ret .= " " x ($depth*3+1);
|
||||
$$ret .= $mi->{'cont'} ? " " : "- ";
|
||||
}
|
||||
|
||||
my $name = $mi->{'name'};
|
||||
$name =~ s/ / /g;
|
||||
if (! defined $mi->{'uri'}) {
|
||||
if ($depth == 0) {
|
||||
$$ret .= "<B>$name</B><BR>";
|
||||
} else {
|
||||
$$ret .= "$name<BR>";
|
||||
}
|
||||
} elsif ($mi->{'match'} ?
|
||||
(BML::get_uri() =~ /$mi->{'match'}/) :
|
||||
(BML::get_uri() eq $mi->{'uri'})
|
||||
){
|
||||
$$ret .= "<B><SPAN style=\"background-color: #FFFFFF\"><FONT COLOR=#0000D0>$name</FONT></SPAN></B><BR>";
|
||||
} else {
|
||||
$$ret .= "<A HREF=\"$mi->{'uri'}\">$name</A><BR>";
|
||||
}
|
||||
|
||||
if ($mi->{'children'} &&
|
||||
($mi->{'recursematch'} ? BML::get_uri() =~ /$mi->{'recursematch'}/ : 1)) {
|
||||
&dump_entry($ret, $mi->{'children'}, $depth+1);
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
&dump_entry(\$ret, \@sidebar, 0);
|
||||
|
||||
return $ret;
|
||||
|
||||
_code?>
|
||||
</FONT>
|
||||
|
||||
</TD></TR></TABLE>
|
||||
</TD>
|
||||
<TD ALIGN=LEFT BACKGROUND="/img/bluewhite/vline.gif" WIDTH=25 NOWRAP>
|
||||
<IMG SRC="/img/bluewhite/linetop.gif" WIDTH=25 HEIGHT=25 ALT=""><BR>
|
||||
<IMG SRC="/img/bluewhite/vline.gif" WIDTH=25 HEIGHT=800 ALT="">
|
||||
</TD>
|
||||
<TD>
|
||||
|
||||
<IMG SRC="/img/dot.gif" WIDTH=1 HEIGHT=3><BR>
|
||||
%%BODY%%
|
||||
|
||||
</TD>
|
||||
<TD WIDTH=20> </TD>
|
||||
</TR>
|
||||
|
||||
<!-- table closure row -->
|
||||
<TR>
|
||||
<TD WIDTH=155 NOWRAP><IMG SRC="/img/bluewhite/sidebarfade.gif" WIDTH=155 HEIGHT=25 ALT=""></TD>
|
||||
<TD WIDTH=25 NOWRAP><IMG SRC="/img/bluewhite/sidebarfade_line.gif" WIDTH=25 HEIGHT=25 ALT=""></TD></TD>
|
||||
<TD>
|
||||
|
||||
</TD>
|
||||
<TD WIDTH=20> </TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
<!-- /table closure row -->
|
||||
|
||||
<!--<TABLE WIDTH=100%>
|
||||
<TR>
|
||||
<TD ALIGN=RIGHT>
|
||||
<FONT FACE="Arial, Helvetica" SIZE="-2">
|
||||
<A HREF="/privacy.bml">Privacy Policy</A> -
|
||||
<A HREF="/coppa.bml">COPPA</A><BR>
|
||||
<A HREF="/disclaimer.bml">Legal Disclaimer</A> -
|
||||
<A HREF="/sitemap.bml">Site Map</A><BR>
|
||||
</FONT>
|
||||
</TD>
|
||||
</TR>
|
||||
</TABLE>
|
||||
-->
|
||||
|
||||
</BODY>
|
||||
</HTML>
|
||||
<=PAGE
|
||||
|
||||
32
local/cgi-bin/bml/scheme/vari
Executable file
32
local/cgi-bin/bml/scheme/vari
Executable file
@@ -0,0 +1,32 @@
|
||||
ljrlook.nav.create
|
||||
ljrlook.nav.update
|
||||
ljrlook.nav.fullupdate
|
||||
ljrlook.nav.site
|
||||
ljrlook.nav.news
|
||||
ljrlook.nav.paidaccounts
|
||||
ljrlook.nav.edit
|
||||
ljrlook.nav.modify
|
||||
ljrlook.nav.editinfo
|
||||
ljrlook.nav.editfriends
|
||||
ljrlook.nav.editjournal
|
||||
ljrlook.nav.editpics
|
||||
ljrlook.nav.changepassword
|
||||
ljrlook.nav.communities.manage
|
||||
ljrlook.nav.frills
|
||||
ljrlook.nav.customize
|
||||
ljrlook.nav.createstyle
|
||||
ljrlook.nav.editstyle
|
||||
ljrlook.nav.needhelp
|
||||
ljrlook.nav.lostinfo
|
||||
ljrlook.nav.support.faq
|
||||
ljrlook.nav.support
|
||||
|
||||
ljrlook.nav.hello
|
||||
ljrlook.nav.yourjournal
|
||||
ljrlook.nav.recent
|
||||
ljrlook.nav.calendar
|
||||
ljrlook.nav.friends
|
||||
ljrlook.nav.userinfo
|
||||
ljrlook.nav.memories
|
||||
ljrlook.nav.logout
|
||||
ljrlook.nav.login
|
||||
Reference in New Issue
Block a user