--- loncom/xml/lonxml.pm	2001/07/27 18:16:22	1.104
+++ loncom/xml/lonxml.pm	2001/08/06 19:44:54	1.105
@@ -132,6 +132,7 @@ sub fontsettings() {
 sub registerurl {
     my $forcereg=shift;
     if ($Apache::lonxml::registered) { return ''; }
+    $Apache::lonxml::registered=1;
     if (($ENV{'REQUEST_URI'}!~/^\/(res\/)*adm\//) || ($forcereg)) {
         my $hwkadd='';
         if ($ENV{'REQUEST_URI'}=~/\.(problem|exam|quiz|assess|survey|form)$/) {