version 1.31, 2011/11/02 18:40:17
|
version 1.32, 2011/11/13 21:11:42
|
Line 78 sub handler {
|
Line 78 sub handler {
|
my $uri=$r->uri; |
my $uri=$r->uri; |
my $fn=&Apache::lonnet::filelocation('',$uri); |
my $fn=&Apache::lonnet::filelocation('',$uri); |
my $contents=''; |
my $contents=''; |
my $constructmode=($uri=~ m/^/priv/}); |
my $constructmode=($uri=~ m{^/priv/}); |
|
|
# ============================================================ Modify and store |
# ============================================================ Modify and store |
if ($constructmode && $env{'form.store'}) { |
if ($constructmode && $env{'form.store'}) { |