Use $u->profile_url, which has handy logic already. Tweak in a couple
of related areas (and one that's not related to openid).
Patch by fu.
diffs (31 lines):
diff -r 5a3fce12991a -r 7b98eca5d3d3 htdocs/profile.bml
--- a/htdocs/profile.bml Wed Nov 17 22:56:06 2010 +0800
+++ b/htdocs/profile.bml Wed Nov 17 23:20:47 2010 +0800
@@ -62,7 +62,7 @@ body<=
# redirect to standard identity url
if ( $u && $u->is_identity ) {
- return
BML::redirect("$LJ::SITEROOT/profile?userid=$u->{'userid'}&t=I");
+ return BML::redirect( $u->profile_url( full => $is_full ) );
}
} elsif ( $remote ) {
$u = $remote;
@@ -90,8 +90,7 @@ body<=
# redirect non-identity profiles to their subdomain urls
my $domain = BML::get_client_header( "Host" );
if ( $LJ::ONLY_USER_VHOSTS && !$u->is_identity ) {
- my $url = $u->journal_base . "/profile";
- $url .= '?mode=full' if $is_full;
+ my $url = $u->profile_url( full => $is_full );
my $good_domain = $url;
$good_domain =~ s!^http://!!;
@@ -427,7 +426,7 @@ body<=
if ( $is_full ) {
$ret .= BML::ml( '.details.profile.default', { aopts => "href='" .
$u->profile_url . "'" } );
} else {
- $ret .= BML::ml( '.details.profile.full', { aopts => "href='" .
$u->profile_url . "?mode=full'" } );
+ $ret .= BML::ml( '.details.profile.full', { aopts => "href='" .
$u->profile_url( full => 1 ) . "'" } );
}
$ret .= q{ </p></div></div></div></div> };
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog
