[LON-CAPA-cvs] cvs: loncom /xml londefdef.pm lontexconvert.pm

matthew lon-capa-cvs@mail.lon-capa.org
Wed, 06 Mar 2002 20:27:00 -0000


matthew		Wed Mar  6 15:27:00 2002 EDT

  Modified files:              
    /loncom/xml	londefdef.pm lontexconvert.pm 
  Log:
  Update to use new &lonxml::registerurl().
  
  
Index: loncom/xml/londefdef.pm
diff -u loncom/xml/londefdef.pm:1.46 loncom/xml/londefdef.pm:1.47
--- loncom/xml/londefdef.pm:1.46	Tue Feb 26 17:27:22 2002
+++ loncom/xml/londefdef.pm	Wed Mar  6 15:27:00 2002
@@ -2,7 +2,7 @@
 # The LearningOnline Network with CAPA
 # Tags Default Definition Module 
 #
-# $Id: londefdef.pm,v 1.46 2002/02/26 22:27:22 sakharuk Exp $
+# $Id: londefdef.pm,v 1.47 2002/03/06 20:27:00 matthew Exp $
 # 
 #
 # Copyright Michigan State University Board of Trustees
@@ -150,7 +150,7 @@
 	    my ($target,$token) = @_;
             my $currentstring = '';
             if ($target eq 'web') {
-              $currentstring = &Apache::lonxml::registerurl().
+              $currentstring = &Apache::lonxml::registerurl(undef,$target).
                                $token->[2];    
             } 
 	   return $currentstring;
@@ -332,7 +332,8 @@
             my $currentstring = '';
             if ($target eq 'web') {
 	      if (!$Apache::lonxml::registered) {
-		$currentstring.='<head>'.&Apache::lonxml::registerurl().'</head>';
+		$currentstring.='<head>'.
+		    &Apache::lonxml::registerurl(undef,$target).'</head>';
 	      }
 	      my $onLoad='';
 	      foreach my $key (keys(%{$token->[2]})) {
@@ -1474,7 +1475,8 @@
 	  my $currentstring = '';
 	  if ($target eq 'web') { 
 	    if (!$Apache::lonxml::registered) {
-	      $currentstring.='<head>'.&Apache::lonxml::registerurl().'</head>';
+	      $currentstring.='<head>'.
+		  &Apache::lonxml::registerurl(undef,$target).'</head>';
 	    }
 	    $currentstring .= $token->[4];
 	  }
Index: loncom/xml/lontexconvert.pm
diff -u loncom/xml/lontexconvert.pm:1.4 loncom/xml/lontexconvert.pm:1.5
--- loncom/xml/lontexconvert.pm:1.4	Thu Nov 29 14:03:58 2001
+++ loncom/xml/lontexconvert.pm	Wed Mar  6 15:27:00 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # TeX Conversion Module
 #
-# $Id: lontexconvert.pm,v 1.4 2001/11/29 19:03:58 www Exp $
+# $Id: lontexconvert.pm,v 1.5 2002/03/06 20:27:00 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -61,7 +61,7 @@
   return &Apache::lonxml::xmlbegin().
          &Apache::lonxml::fontsettings().
          "\n<head>\n".
-         &Apache::lonxml::registerurl().
+         &Apache::lonxml::registerurl(undef,'tex').
 	 "\n</head>\n";
 }