--- loncom/interface/portfolio.pm 2004/10/11 22:52:20 1.47
+++ loncom/interface/portfolio.pm 2004/10/18 20:37:30 1.49
@@ -38,7 +38,7 @@ sub make_anchor {
return $anchor;
}
my $dirptr=16384;
-sub display_directory {
+sub display_common {
my ($r,$current_path,$is_empty,$dir_list)=@_;
my $iconpath= $r->dir_config('lonIconsURL') . "/";
$r->print('
');
@@ -73,15 +73,20 @@ sub display_directory {
&Apache::lonhtmlcommon::select_recent('portfolio','currentpath',
'this.form.submit();'));
$r->print("");
+}
+sub display_directory {
+ my ($r,$current_path,$is_empty,$dir_list)=@_;
+ my $iconpath= $r->dir_config('lonIconsURL') . "/";
+ my $display_out;
if ($is_empty && ($current_path ne '/')) {
- $displayOut = '';
- $r->print($displayOut);
+ $r->print($display_out);
return;
}
$r->print('
'.
@@ -135,53 +140,23 @@ sub display_directory {
sub display_file_select {
my ($r,$current_path,$is_empty,$dir_list)=@_;
my $iconpath= $r->dir_config('lonIconsURL') . "/";
- $r->print('
');
- $r->print('
');
- my $displayOut = '';
- $r->print($displayOut);
- $r->print('