--- loncom/interface/loncommon.pm	2005/10/04 18:49:32	1.278
+++ loncom/interface/loncommon.pm	2005/10/14 20:16:46	1.280
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.278 2005/10/04 18:49:32 raeburn Exp $
+# $Id: loncommon.pm,v 1.280 2005/10/14 20:16:46 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3118,6 +3118,15 @@ sub get_course_users {
                 }
             }
         }
+        if (grep/^ow$/,@{$roles}) {
+            if ((defined($cdom)) && (defined($cnum))) {
+                my %csettings = &Apache::lonnet::get('environment',['internal.courseowner'],$cdom,$cnum);
+                if ( defined($csettings{'internal.courseowner'}) ) {
+                    my $owner = $csettings{'internal.courseowner'};
+                    $$users{'ow'}{$owner.':'.$cdom} = 'any';
+                }
+            }
+        }
     }
     return;
 }
@@ -3707,7 +3716,7 @@ the routine &Apache::lonnet::transfer_pr
 my $uniq=0;
 sub get_cgi_id {
     $uniq=($uniq+1)%100000;
-    return (time.'_'.$uniq);
+    return (time.'_'.$$.'_'.$uniq);
 }
 
 ############################################################