--- loncom/xml/lonxml.pm 2002/03/29 18:32:46 1.163 +++ loncom/xml/lonxml.pm 2002/04/10 14:46:30 1.166 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # XML Parser Module # -# $Id: lonxml.pm,v 1.163 2002/03/29 18:32:46 albertel Exp $ +# $Id: lonxml.pm,v 1.166 2002/04/10 14:46:30 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -176,10 +176,12 @@ sub xmlend { } my $sender='Anonymous'; if ((!$contrib{$idx.':anonymous'}) || ($seeid)) { - $sender=$contrib{$idx.':sendername'}.' at '. - $contrib{$idx.':senderdomain'}; + $sender=$contrib{$idx.':plainname'}.' ('. + $contrib{$idx.':sendername'}.' at '. + $contrib{$idx.':senderdomain'}.')'; if ($contrib{$idx.':anonymous'}) { - $sender.=' (anonymous)'; + $sender.=' [anonymous] '. + $contrib{$idx.':screenname'}; } if ($seeid) { if ($hidden) { @@ -190,6 +192,10 @@ sub xmlend { $symb.':::'.$idx.'">Hide'; } } + } else { + if ($contrib{$idx.':screenname'}) { + $sender=''.$contrib{$idx.':screenname'}.''; + } } $discussion.='

'.$sender.' ('. localtime($contrib{$idx.':timestamp'}). @@ -440,8 +446,13 @@ ENDDONOTREGTHIS # Inputs are the name of the html form being used # and the name of the element the selected URL should # be placed in. + # openbrowser also takes arguments only and omit, which are + # comma deliminated lists of file extensions to (only) show + # or omit. + # Here we also set currentURL=null. $result .=<<"ENDBROWSERSCRIPT";