--- loncom/interface/portfolio.pm 2004/12/14 19:10:07 1.66 +++ loncom/interface/portfolio.pm 2004/12/16 21:19:46 1.68 @@ -148,9 +148,6 @@ sub display_file_select { my $iconpath= $r->dir_config('lonIconsURL') . "/"; my $display_out; my $checked_files = &Apache::lonnet::files_in_path($ENV{'user.name'}, $ENV{'form.currentpath'}); - foreach my $key (keys %$checked_files) { - &Apache::lonnet::logthis("a key is $key $$checked_files{$key} is the value"); - } if ($is_empty && ($current_path ne '/')) { $display_out = '<form method="post" action="/adm/portfolio">'. '<input type="hidden" name="action" value="deletedir" />'. @@ -188,9 +185,6 @@ sub display_file_select { $r->print('<td><input type="checkbox" name="selectfile" value="'.$filename.'"'); if ($$checked_files{$filename} eq 'selected') { $r->print("CHECKED"); - &Apache::lonnet::logthis("checked"); - } else { - &Apache::lonnet::logthis("not checked $$checked_files{$filename} $filename"); } $r->print('></td>'); $r->print('<td><img src="'.$iconpath.'unknown.gif"></td>'); @@ -291,7 +285,6 @@ sub delete_confirmed { my @files=&Apache::loncommon::get_env_multiple('form.selectfile'); my $result; foreach my $delete_file (@files) { - &Apache::lonnet::logthis("trying to delete $delete_file"); $result=&Apache::lonnet::removeuserfile($ENV{'user.name'}, $ENV{'user.domain'},'portfolio'. $ENV{'form.currentpath'}. @@ -496,6 +489,9 @@ sub createdir { ') while trying to create a new directory '.&display_file().'</font><br />'); } } + if ($newdir ne $ENV{'form.newdir'}) { + $r->print("The new directory name was changed from:<br /><strong>".$ENV{'form.newdir'}."</strong> to <strong>$newdir </strong>"); + } $r->print(&done()); }