version 1.7, 2008/12/11 14:52:26
|
version 1.9, 2013/06/02 02:20:33
|
Line 1
|
Line 1
|
# The LearningOnline Network |
# The LearningOnline Network |
# Passphrase Entry and Validation for Portfolio files |
# Passphrase Entry and Validation for Portfolio files |
# |
# |
|
# $Id$ |
|
# |
# Copyright Michigan State University Board of Trustees |
# Copyright Michigan State University Board of Trustees |
# |
# |
# This file is part of the LearningOnline Network with CAPA (LON-CAPA). |
# This file is part of the LearningOnline Network with CAPA (LON-CAPA). |
Line 53 sub handler {
|
Line 55 sub handler {
|
$origurl); |
$origurl); |
$env{'request.state'} = "published"; |
$env{'request.state'} = "published"; |
$env{'request.filename'} = $origurl; |
$env{'request.filename'} = $origurl; |
$r->header_out(Location => 'http://'.$ENV{'HTTP_HOST'}.$origurl); |
my $newurl = &Apache::lonnet::absolute_url($ENV{'HTTP_HOST'}).$origurl; |
|
$r->header_out(Location => $newurl); |
return REDIRECT; |
return REDIRECT; |
} else { |
} else { |
$msg = 'Invalid passphrase'; |
$msg = 'Invalid passphrase'; |