_parent=>../../lj-bml-blocks.pl
loginboxstyle=>{Ss}background: url(/userinfo.gif) no-repeat; background-color: #fff; background-position: 0px 1px; padding-left: 18px; color: #00C; font-weight: bold;
commloginboxstyle=>{Ss}background: url(/community.gif) no-repeat; background-color: #fff; background-position: 0px 2px; padding-left: 19px; color: #00C; font-weight: bold;
SECURITYPRIVATE=>{Ss}
SECURITYPROTECTED=>{Ss}
LJUSER=>{DRs}%%data%%
LJCOMM=>{DRs}%%data%%
LJUSERF=>{DRs}%%data%%
HELP=>{DR}(help)
INERR=>{DR}%%data%%
SOERROR=>{DR}
%%data%%
EMAILEX=>%%data%%
ENTRYFORMCSS<=
{Ss}
<=ENTRYFORMCSS
NEEDLOGIN<=
h1?>
p?>
<=NEEDLOGIN
BADINPUT<=
h1?>
p?>
<=BADINPUT
REQUIREPOST=>
LOAD_PAGE_INFO<=
'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', },
{ '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}%%data2%%
AWAYLINK=>{P}%%data2%%
H1=>{D}%%data%%
H2=>{D}%%data%%
# Banner Header: search results banner, content desriptor, etc...
BH=>{D}%%data%%
GRIN=>{S}<grin>
HR=>{S}
NEWLINE=>{S}
P=>{D}%%data%%
STANDOUT<=
{D}
%%data%%
<=STANDOUT
ERRORBAR<=
{D}
%%data%%
<=ERRORBAR
WARNINGBAR<=
{D}
%%data%%
<=WARNINGBAR
BADCONTENT<=
h1?>
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}%%data1%%%%data3%%
CHOICES<=
{F}
<=CHOICES
PAGE<=
{Fp}
%%title%%%%head%%
%%body%%
<=PAGE
BREADCRUMBS<=
{Fp}[3]; # no blank crumbs
if ($crumb->[3] eq 'dynamic') {
# dynamic
unshift @ret, "$crumb->[0]";
$count++;
} else {
# non-dynamic
unshift @ret, $count++ == 0 ?
"$ML{'crumb.'.$crumb->[3]}" :
$crumb->[1] ne '' ?
"[1]\">$ML{'crumb.'.$crumb->[3]}" :
"$ML{'crumb.'.$crumb->[3]}";
}
}
return "" . join(" : ", @ret) . "
";
_code?>
<=BREADCRUMBS