[ljcom] r9317: LJSUP-6500 (Twitter crossposting): allow...

U   branches/facebook-integration2/htdocs/manage/settings/facebook.bml
U   branches/facebook-integration2/htdocs/manage/settings/twitter.bml

Modified: branches/facebook-integration2/htdocs/manage/settings/facebook.bml
===================================================================
--- branches/facebook-integration2/htdocs/manage/settings/facebook.bml	2010-08-09 01:49:56 UTC (rev 9316)
+++ branches/facebook-integration2/htdocs/manage/settings/facebook.bml	2010-08-09 02:16:54 UTC (rev 9317)
@@ -16,9 +16,12 @@
     # bogus remote or parameters, redirect them back to settings
     return LJ::Request->redirect($settings_page)
         unless $remote
-            && $remote->is_personal
             && $act =~ /^(?:connect|disconnect)$/;
 
+    return LJ::Request->redirect($settings_page)
+        if    $remote->is_identity
+           && $remote->identity->short_code eq 'facebook';
+
     if ($act eq 'connect') {
         my $fb_code = LJ::Request->get_param('code');
 

Modified: branches/facebook-integration2/htdocs/manage/settings/twitter.bml
===================================================================
--- branches/facebook-integration2/htdocs/manage/settings/twitter.bml	2010-08-09 01:49:56 UTC (rev 9316)
+++ branches/facebook-integration2/htdocs/manage/settings/twitter.bml	2010-08-09 02:16:54 UTC (rev 9317)
@@ -18,7 +18,6 @@
     # bogus remote or parameters, redirect them back to settings
     return LJ::Request->redirect($settings_page)
         unless $remote
-            && $remote->is_personal
             && $act =~ /^(?:connect|disconnect)$/;
 
     if ($act eq 'connect') {