--- loncom/interface/loncreateuser.pm	2007/12/31 01:58:17	1.225
+++ loncom/interface/loncreateuser.pm	2007/12/31 02:28:12	1.226
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Create a user
 #
-# $Id: loncreateuser.pm,v 1.225 2007/12/31 01:58:17 raeburn Exp $
+# $Id: loncreateuser.pm,v 1.226 2007/12/31 02:28:12 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2029,6 +2029,7 @@ END
     }
     if ($env{'form.action'} eq 'singlestudent') {
         &enroll_single_student($r,$uhome,$amode,$genpwd,$now,$newuser);
+        $r->print('<p><a href="javascript:backPage(document.userupdate)">'.                  &mt('Enroll Another Student').'</a></p>');
     } else {
         my @rolechanges = &update_roles($r);
         if ($namechanged) {
@@ -2046,6 +2047,9 @@ END
                 }
             }
         }
+        my $userinfo = &Apache::loncommon::plainname($env{'form.ccuname'},
+                                                     $env{'form.ccdomain'}); 
+        $r->print('<p><a href="javascript:backPage(document.userupdate,'."'$env{'form.prevphase'}','modify'".')">'.&mt('Modify this user: <span class="LC_cusr_emph">([_1])</span>',$userinfo).'</a>'.('&nbsp;'x5).'<a href="javascript:backPage(document.userupdate)">'.&mt('Create/Modify Another User').'</a></p>');
     }
     $r->print(&Apache::loncommon::end_page());
 }