--- rat/lonsequence.pm	2008/12/21 04:53:39	1.32.2.1
+++ rat/lonsequence.pm	2008/11/18 19:13:37	1.34
@@ -2,7 +2,7 @@
 #
 # Sequence Handler
 #
-# $Id: lonsequence.pm,v 1.32.2.1 2008/12/21 04:53:39 raeburn Exp $
+# $Id: lonsequence.pm,v 1.34 2008/11/18 19:13:37 jms Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -27,6 +27,36 @@
 # 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 SUBROUTINES
+
+=over
+
+=item handler()
+
+=item viewmap()
+
+=item attemptread()
+
+=item mapread()
+
+=item start_fresh_session()
+
+=back
+
+=cut
+
 package Apache::lonsequence;
 
 use strict;
@@ -278,8 +308,7 @@ 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'}).
-                                 $disurl);
+      $r->header_out(Location => 'http://'.$ENV{'HTTP_HOST'}.$disurl);
       return REDIRECT;
    } else {
        &Apache::loncommon::content_type($r,'text/html');