[LON-CAPA-cvs] cvs: loncom /auth lonroles.pm

raeburn raeburn at source.lon-capa.org
Fri May 10 11:02:45 EDT 2013


raeburn		Fri May 10 15:02:45 2013 EDT

  Modified files:              
    /loncom/auth	lonroles.pm 
  Log:
    - Suppress "Apache2::RequestIO::print: (103) Software caused connection abort" 
      messages in Apache error log by returning OK when internal redirect is used.
  
  
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.284 loncom/auth/lonroles.pm:1.285
--- loncom/auth/lonroles.pm:1.284	Thu May  9 05:24:42 2013
+++ loncom/auth/lonroles.pm	Fri May 10 15:02:45 2013
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.284 2013/05/09 05:24:42 raeburn Exp $
+# $Id: lonroles.pm,v 1.285 2013/05/10 15:02:45 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -311,6 +311,7 @@
                             my $trolecode = 'au./'.$domain.'/';
                             my $switchserver = '/adm/switchserver?otherserver='.$home.'&role='.$trolecode;
                             $r->internal_redirect($switchserver);
+                            return OK;
                         }
                         last;
                     }
@@ -322,6 +323,7 @@
                                 my $trolecode = 'ca./'.$domain.'/'.$user;
                                 my $switchserver = '/adm/switchserver?otherserver='.$home.'&role='.$trolecode;
                                 $r->internal_redirect($switchserver);
+                                return OK;
                             }
                             last;
                         }
@@ -343,6 +345,7 @@
                                 my $switchserver = '/adm/switchserver?'
                                                   .'otherserver='.$home.'&role='.$trolecode;
                                 $r->internal_redirect($switchserver);
+                                return OK;
                             }
                         } else {
                             delete($env{$envkey});




More information about the LON-CAPA-cvs mailing list