--- loncom/auth/migrateuser.pm	2005/12/28 19:26:02	1.4
+++ loncom/auth/migrateuser.pm	2006/04/05 22:39:55	1.5
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Starts a user off based of an existing token.
 #
-# $Id: migrateuser.pm,v 1.4 2005/12/28 19:26:02 albertel Exp $
+# $Id: migrateuser.pm,v 1.5 2006/04/05 22:39:55 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -37,21 +37,12 @@ sub goto_login {
     my ($r) = @_;
     &Apache::loncommon::content_type($r,'text/html');
     $r->send_http_header;
-    $r->print(<<TOLOGIN);
-<html>
-  <head>
-    <meta http-equiv="refresh" content="0;url=/adm/login" />
-    <title>Going to login</title>
-  </head>
-  <body>
-    <h1>One moment please...</h1>
-    <p>
-      Transferring to login page.
-      <a href="/adm/login">Continue</a>
-    </p>
-  </body>
-</html>
-TOLOGIN
+    $r->print(&Apache::loncommon::start_page('Going to login',undef,
+					     {'redirect' =>
+						  [0,'/adm/login'],}).
+	      '<h1>'.&mt('One moment please...').'</h1>'.
+	      '<p>'.&mt('Transferring to login page.').'</p>'.
+	      &Apache::loncommon::end_page());
     return OK;
 }
 
