--- loncom/interface/Attic/lonchart.pm 2002/06/03 19:28:17 1.41 +++ loncom/interface/Attic/lonchart.pm 2002/06/04 19:59:34 1.42 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # (Publication Handler # -# $Id: lonchart.pm,v 1.41 2002/06/03 19:28:17 albertel Exp $ +# $Id: lonchart.pm,v 1.42 2002/06/04 19:59:34 stredwic Exp $ # # Copyright Michigan State University Board of Trustees # @@ -313,11 +313,11 @@ sub BuildChart { ,'firstname' ,'middlename'], $sdom,$sname); - my $name=$name{lastname}; - if ($name{generation}) {$name.=" $name{generation}";} + my $name=$name{'lastname'}; + if ($name{'generation'}) {$name.=" $name{generation}";} $name.=','; - if ($name{firstname}) {$name.=" $name{firstname}";} - if ($name{middlename}) {$name.=" $name{middlename}";} + if ($name{'firstname'}) {$name.=" $name{firstname}";} + if ($name{'middlename'}) {$name.=" $name{middlename}";} if ($name eq ',') {$name='';} #$ssec=(int($ssec)) ? int($ssec) : $ssec; my $sec=sprintf('%3s',$ssec);