--- loncom/interface/lonfeedback.pm 2002/10/03 15:04:29 1.33
+++ loncom/interface/lonfeedback.pm 2002/10/11 20:52:13 1.34
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Feedback
#
-# $Id: lonfeedback.pm,v 1.33 2002/10/03 15:04:29 www Exp $
+# $Id: lonfeedback.pm,v 1.34 2002/10/11 20:52:13 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -294,7 +294,7 @@ sub send_msg {
if ($_) {
my $declutter=&Apache::lonnet::declutter($feedurl);
unless (&Apache::lonmsg::user_normal_msg(split(/\:/,$_),
- 'Feedback ['.$declutter.']',$email,$citations) eq 'ok') {
+ 'Feedback ['.$declutter.']',$email,$citations)=~/ok/) {
$status.='
Error sending message to '.$_.'
';
} else {
$sendsomething++;