[LON-CAPA-cvs] cvs: loncom /interface lonhtmlcommon.pm

banghart lon-capa-cvs@mail.lon-capa.org
Fri, 10 Sep 2004 17:58:01 -0000


banghart		Fri Sep 10 13:58:01 2004 EDT

  Modified files:              
    /loncom/interface	lonhtmlcommon.pm 
  Log:
  	Added remove_recent routine to remove deleted directories
  	from list that populates recent dropdown.
  
  
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.88 loncom/interface/lonhtmlcommon.pm:1.89
--- loncom/interface/lonhtmlcommon.pm:1.88	Sun Aug 29 03:03:53 2004
+++ loncom/interface/lonhtmlcommon.pm	Fri Sep 10 13:58:01 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.88 2004/08/29 07:03:53 albertel Exp $
+# $Id: lonhtmlcommon.pm,v 1.89 2004/09/10 17:58:01 banghart Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -117,6 +117,12 @@
 				 time.'&'.&Apache::lonnet::escape($value) });
 }
 
+sub remove_recent {
+    my ($area,$names)=@_;
+    my $file=&recent_filename($area);
+    return &Apache::lonnet::del($file,$names);
+}
+
 sub select_recent {
     my ($area,$fieldname,$event)=@_;
     my %recent=&Apache::lonnet::dump(&recent_filename($area));