--- loncom/xml/lonxml.pm	2001/01/05 19:45:03	1.44
+++ loncom/xml/lonxml.pm	2001/01/06 15:31:27	1.45
@@ -3,6 +3,7 @@
 #
 # last modified 06/26/00 by Alexander Sakharuk
 # 11/6 Gerd Kortemeyer
+# 6/1/1 Gerd Kortemeyer
 
 package Apache::lonxml; 
 use vars 
@@ -12,6 +13,7 @@ use HTML::TokeParser;
 use Safe;
 use Safe::Hole;
 use Opcode;
+use Apache::Constants(:common);
 
 sub register {
   my $space;
@@ -358,7 +360,7 @@ sub handler {
 #  &Apache::lonhomework::send_header($request);
   $request->send_http_header;
 
-  return 'OK' if $request->header_only;
+  return OK if $request->header_only;
 
   $request->print(&Apache::lontexconvert::header());
 
@@ -373,7 +375,7 @@ sub handler {
   $request->print('</body>');
   $request->print(&Apache::lontexconvert::footer());
   writeallows($request->uri);
-  return 'OK';
+  return OK;
 }
  
 $Apache::lonxml::debug=0;