--- loncom/interface/loncommon.pm	2009/05/27 13:36:46	1.825
+++ loncom/interface/loncommon.pm	2009/05/27 13:42:04	1.826
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.825 2009/05/27 13:36:46 bisitz Exp $
+# $Id: loncommon.pm,v 1.826 2009/05/27 13:42:04 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -6839,7 +6839,7 @@ sub get_users_function {
     if ($env{'request.role'}=~/^(su|dc|ad|li)/) {
         $function='admin';
     }
-    if (($env{'request.role'}=~/^(au|ca)/) ||
+    if (($env{'request.role'}=~/^(au|ca|aa)/) ||
         ($ENV{'REQUEST_URI'}=~/^(\/priv|\~)/)) {
         $function='author';
     }