Changeset 1083 for trunk

Show
Ignore:
Timestamp:
05/06/02 07:20:14 (11 years ago)
Author:
bradfitz
Message:

lets people remove friends from the friend add page. :)

okay, sounds counter-intuitive, but try it out... it's nice.

maybe need to change userinfo.bml toolbar link later.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • trunk/htdocs/friends/add.bml

    r911 r1083  
    3737         $gmask |= (1 << $bit); 
    3838     } 
    39       
    40      my %res = (); 
    41      LJ::do_request($dbh, { 
     39 
     40     my $req = { 
    4241         "user" => $remote->{'user'}, 
    4342         "mode" => "editfriends", 
    4443         "ver"  => $LJ::PROTOCOL_VER, 
    45          "editfriend_add_1_user" => $user, 
    46          "editfriend_add_1_fg" => $FORM{'editfriend_add_1_fg'},  
    47          "editfriend_add_1_bg" => $FORM{'editfriend_add_1_bg'}, 
    48          "editfriend_add_1_groupmask" => $gmask, 
    49      }, \%res, { "noauth" => 1, "userid" => $remote->{'userid'} } ); 
     44     }; 
     45 
     46 
     47     if ($FORM{'action:delete'}) { 
     48         $req->{"editfriend_delete_$user"} = 1; 
     49     } else { 
     50         $req->{"editfriend_add_1_user"} = $user; 
     51         $req->{"editfriend_add_1_fg"} = $FORM{'editfriend_add_1_fg'}; 
     52         $req->{"editfriend_add_1_bg"} = $FORM{'editfriend_add_1_bg'}; 
     53         $req->{"editfriend_add_1_groupmask"} = $gmask; 
     54     } 
    5055      
    51  
     56     my %res = (); 
     57     LJ::do_request($dbh, $req, \%res,  
     58                    { "noauth" => 1, "userid" => $remote->{'userid'} } ); 
     59      
    5260     if ($res{'success'} eq "OK")  
    5361     { 
    54          $title = "Friend Added!"; 
    55          $body = "(=H1 Success H1=)(=P User <B>$user</B> was added to your friend list.  You can view your friends page <A HREF=\"$LJ::SITEROOT/users/$remote->{'user'}/friends\">here</A>. P=)"; 
     62         if ($FORM{'action:delete'}) { 
     63             $title = "Friend Removed"; 
     64             $body = "(=H1 Success H1=)(=P User (=LJUSER $user LJUSER=) was removed from your friends list.  You can view your friends page <A HREF=\"$LJ::SITEROOT/users/$remote->{'user'}/friends\">here</A>. P=)"; 
     65         } else { 
     66             $title = "Friend Added!"; 
     67             $body = "(=H1 Success H1=)(=P User (=LJUSER $user LJUSER=) was added to your friend list.  You can view your friends page <A HREF=\"$LJ::SITEROOT/users/$remote->{'user'}/friends\">here</A>. P=)"; 
     68         } 
    5669     } else { 
    5770         $title = "Error"; 
     
    6881 if ($fr) { 
    6982     $title .= "Modify Friend"; 
    70      $body .= "(=H1 Modify Friend H1=)(=P You already have <b>$user</b> listed as a friend.  However, you can modify the colors you've chosen to represent him/her. P=)"; 
     83     $body .= "(=H1 Modify Friend H1=)(=P You already have (=LJUSER $user LJUSER=) listed as a friend.  Here you can either modify the settings (colors & groups) or remove $user from your friends list. P=)"; 
    7184 } else { 
    7285     $title .= "Add Friend"; 
     
    7487 } 
    7588 
    76  $body .= "<form method=post>"; 
    77  $body .= "<input type=hidden name=mode value=add>"; 
    78  $body .= "<input type=hidden name=user value=\"$user\">"; 
     89 $body .= "<form method='post'>"; 
     90 $body .= "<input type='hidden' name='mode' value='add'>"; 
     91 $body .= "<input type='hidden' name='user' value=\"$user\">"; 
    7992 
    8093 if ($fr) { 
    81      $body .= "<center><input type=submit value=\"Save.\"></center>"; 
     94     $body .= "<center><input type='submit' value=\"Modify\">"; 
     95     $body .= " - <input type='submit' name='action:delete' value=\"Remove\"></center>"; 
    8296 } else { 
    83      $body .= "<center><input type=submit value=\"Add $user!\"></center>"; 
     97     $body .= "<center><input type='submit' value=\"Add $user!\"></center>"; 
    8498 } 
    8599