--- loncom/interface/Attic/londropadd.pm	2003/12/05 21:27:59	1.91
+++ loncom/interface/Attic/londropadd.pm	2004/01/21 00:23:30	1.91.2.1
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to drop and add students in courses 
 #
-# $Id: londropadd.pm,v 1.91 2003/12/05 21:27:59 raeburn Exp $
+# $Id: londropadd.pm,v 1.91.2.1 2004/01/21 00:23:30 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -43,6 +43,7 @@ use Apache::lonhtmlcommon();
 use Apache::Constants qw(:common :http REDIRECT);
 use Spreadsheet::WriteExcel;
 use Apache::lonlocal;
+use localenroll();
 
 ###############################################################
 ###############################################################
@@ -171,10 +172,14 @@ sub print_main_menu {
     <a href="/adm/dropadd?action=drop">$Text{'drop'}</a>
 </font>
 </p><p>
+END
+    if (&localenroll::run() ) {
+	$r->print(<<END);
 <font size="+1">
     <a href="/adm/populate">$Text{'populate'}</a>
 </font>
 END
+    }
 }
 
 ###############################################################