loncom/interface/portfolio.pm - diff

Return to portfolio.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.6, 2004/06/25 18:47:18	version 1.7, 2004/06/25 20:50:05
Line 137 sub displayActions {	Line 137 sub displayActions {
}	}
sub handler {	sub handler {
# this handles file management	# this handles file management
my $r=@_[0];	my ($r)=@_;
my @dirList; # will hold directory listing as array	my @dirList; # will hold directory listing as array
my $udir; # returned from home server	my $udir; # returned from home server
my $currentPath; # path assuming /userfiles/portfolio/ as root	my $currentPath; # path assuming /userfiles/portfolio/ as root