--- loncom/interface/loncommon.pm 2006/07/03 00:11:53 1.413
+++ loncom/interface/loncommon.pm 2006/07/03 00:44:21 1.414
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.413 2006/07/03 00:11:53 albertel Exp $
+# $Id: loncommon.pm,v 1.414 2006/07/03 00:44:21 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -3513,9 +3513,11 @@ sub headtag {
}
if (ref($args->{'redirect'})) {
- my ($time,$url) = @{$args->{'redirect'}};
+ my ($time,$url,$inhibit_continue) = @{$args->{'redirect'}};
$url = &Apache::lonenc::check_encrypt($url);
- $env{'internal.head.redirect'} = $url;
+ if (!$inhibit_continue) {
+ $env{'internal.head.redirect'} = $url;
+ }
$result.=<