[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm

albertel lon-capa-cvs@mail.lon-capa.org
Mon, 14 Feb 2005 01:44:03 -0000


albertel		Sun Feb 13 20:44:03 2005 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  - tiny xhtmlizing change
  - icons -> lonhttpd
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.248 loncom/interface/loncommon.pm:1.249
--- loncom/interface/loncommon.pm:1.248	Fri Feb 11 22:27:57 2005
+++ loncom/interface/loncommon.pm	Sun Feb 13 20:44:02 2005
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.248 2005/02/12 03:27:57 albertel Exp $
+# $Id: loncommon.pm,v 1.249 2005/02/14 01:44:02 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1142,7 +1142,7 @@
     my $selectdomain = "<select name=\"$name\" size=\"1\">\n";
     foreach (@domains) {
         $selectdomain.="<option value=\"$_\" ".
-            ($_ eq $defdom ? 'selected' : '').
+            ($_ eq $defdom ? 'selected="selected"' : '').
                 ">$_</option>\n";
     }
     $selectdomain.="</select>";
@@ -3919,7 +3919,7 @@
 		$curfext.".gif";
 	}
     }
-    return $iconname;
+    return &lonhttpdurl($iconname);
 } 
 
 sub lonhttpdurl {