--- loncom/interface/lonhtmlcommon.pm 2013/12/31 01:17:34 1.355
+++ loncom/interface/lonhtmlcommon.pm 2014/12/11 01:44:55 1.357
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.355 2013/12/31 01:17:34 raeburn Exp $
+# $Id: lonhtmlcommon.pm,v 1.357 2014/12/11 01:44:55 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1227,7 +1227,7 @@ ENDEDITOR
-
+
@@ -3348,7 +3348,7 @@ END
sub htmltag{
return
qq|<$_[0]|
- . join( '', map { qq| $_="${$_[2]}{$_}"| if ${$_[2]}{$_} } keys %{ $_[2] } )
+ . join( '', map { qq| $_="${$_[2]}{$_}"| if ${$_[2]}{$_} } keys(%{ $_[2] }) )
. ($_[1] ? qq|>$_[1]$_[0]>| : qq|/>|). "\n";
};