--- loncom/interface/lonhtmlcommon.pm 2014/01/15 17:52:04 1.356
+++ 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.356 2014/01/15 17:52:04 raeburn Exp $
+# $Id: lonhtmlcommon.pm,v 1.357 2014/12/11 01:44:55 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -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";
};