--- loncom/lonnet/perl/lonnet.pm 2015/10/26 16:03:42 1.1295 +++ loncom/lonnet/perl/lonnet.pm 2015/12/03 20:40:42 1.1296 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1295 2015/10/26 16:03:42 raeburn Exp $ +# $Id: lonnet.pm,v 1.1296 2015/12/03 20:40:42 damieng Exp $ # # Copyright Michigan State University Board of Trustees # @@ -7213,7 +7213,7 @@ sub constructaccess { my ($ownername,$ownerdomain,$ownerhome); ($ownerdomain,$ownername) = - ($url=~ m{^(?:\Q$perlvar{'lonDocRoot'}\E|)/priv/($match_domain)/($match_username)/}); + ($url=~ m{^(?:\Q$perlvar{'lonDocRoot'}\E|)(?:/daxeopen)?/priv/($match_domain)/($match_username)/}); # The URL does not really point to any authorspace, forget it unless (($ownername) && ($ownerdomain)) { return ''; }