--- loncom/interface/lonfeedback.pm 2003/02/17 17:09:27 1.40 +++ loncom/interface/lonfeedback.pm 2003/02/18 15:47:40 1.41 @@ -1,7 +1,7 @@ # The LearningOnline Network # Feedback # -# $Id: lonfeedback.pm,v 1.40 2003/02/17 17:09:27 albertel Exp $ +# $Id: lonfeedback.pm,v 1.41 2003/02/18 15:47:40 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -342,7 +342,7 @@ sub send_msg { if ($_) { my $declutter=&Apache::lonnet::declutter($feedurl); unless (&Apache::lonmsg::user_normal_msg(split(/\:/,$_), - 'Feedback ['.$declutter.']',$email,$citations)=~/ok/) { + 'Feedback ['.$declutter.']',$email,$citations,$feedurl)=~/ok/) { $status.='
Error sending message to '.$_.'
'; } else { $sendsomething++;