version 1.41, 2004/09/10 17:59:13
|
version 1.42, 2004/09/10 18:05:15
|
Line 213 sub delete_dir_confirmed {
|
Line 213 sub delete_dir_confirmed {
|
} else { |
} else { |
# now remove from recent |
# now remove from recent |
# $r->print('<br /> removing '.$directory_name.'<br /'); |
# $r->print('<br /> removing '.$directory_name.'<br /'); |
my @rem_dirs = ($directory_name.'/'); |
&Apache::lonhtmlcommon::remove_recent('portfolio',[$directory_name.'/']); |
&Apache::lonhtmlcommon::remove_recent('portfolio',\@rem_dirs); |
|
my @dirs = split m!/!, $directory_name; |
my @dirs = split m!/!, $directory_name; |
|
|
# $directory_name =~ m/^(\/*\/)(\/*.)$/; |
# $directory_name =~ m/^(\/*\/)(\/*.)$/; |