version 1.1, 2004/10/26 15:03:08
|
version 1.2, 2004/11/02 23:11:56
|
Line 30
|
Line 30
|
package localstudentphoto; |
package localstudentphoto; |
use lib '/home/httpd/lib/perl/'; |
use lib '/home/httpd/lib/perl/'; |
use LONCAPA::Configuration; |
use LONCAPA::Configuration; |
use Apache::loncommon; |
|
|
|
sub fetch { |
sub fetch { |
my ($domain,$user)=@_; |
my ($domain,$user)=@_; |
return &Apache::loncommon::propath($domain,$user). |
return &main::propath($domain,$user). |
'/userfiles/internal/studentphoto.jpg'; |
'/userfiles/internal/studentphoto.jpg'; |
} |
} |
|
|