--- loncom/interface/lonfeedback.pm 2002/01/01 15:02:31 1.21
+++ loncom/interface/lonfeedback.pm 2002/01/01 16:39:32 1.22
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Feedback
#
-# $Id: lonfeedback.pm,v 1.21 2002/01/01 15:02:31 www Exp $
+# $Id: lonfeedback.pm,v 1.22 2002/01/01 16:39:32 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -40,7 +40,9 @@
# 7/25 Gerd Kortemeyer
# 7/26 Guy Albertelli
# 7/26,8/10,10/1,11/5,11/6,12/27,12/29 Gerd Kortemeyer
-
+# YEAR=2002
+# 1/1 Gerd Kortemeyer
+#
package Apache::lonfeedback;
@@ -284,8 +286,9 @@ sub send_msg {
my $sendsomething=0;
map {
if ($_) {
+ my $declutter=&Apache::lonnet::declutter($feedurl);
unless (&Apache::lonmsg::user_normal_msg(split(/\:/,$_),
- 'Feedback '.$feedurl,$email,$citations) eq 'ok') {
+ 'Feedback ['.$declutter.']',$email,$citations) eq 'ok') {
$status.='
Error sending message to '.$_.'
';
} else {
$sendsomething++;