rat/lonsequence.pm - diff

Return to lonsequence.pm CVS log

Up to [LON-CAPA] / rat

-version 1.32.2.1, 2008/12/21 04:53:39
+version 1.33, 2008/11/11 16:40:38
  Line 27
  # http://www.lon-capa.org/
  #
+ =head1 NAME
+ Apache::lonsequence
+ =head1 SYNOPSIS
+ Handler for showing sequence objects of
+ educational resources.
+ This is part of the LearningOnline Network with CAPA project
+ described at http://www.lon-capa.org.
+ =head1 HANDLER SUBROUTINE
+ handler()
+ and
+ viewmap()
+ =head1 OTHER SUBROUTINES
+ =over
+ =item *
+ attemptread()
+ =item *
+ mapread()
+ =item *
+ start_fresh_session()
+ =back
+ =cut
  package Apache::lonsequence;
  use strict;
- Line 278  sub handler {
+ Line 318  sub handler {
        &Apache::lonnet::symblist($requrl,$disurl => [$disurl,$dismapid],
  				'last_known' => [$disurl,$dismapid]);
        &Apache::loncommon::content_type($r,'text/html');
-       $r->header_out(Location => &Apache::lonnet::absolute_url($ENV{'SERVER_NAME'}).
+       $r->header_out(Location => 'http://'.$ENV{'HTTP_HOST'}.$disurl);
-                                  $disurl);
        return REDIRECT;
     } else {
         &Apache::loncommon::content_type($r,'text/html');