[LON-CAPA-cvs] cvs: loncom(version_2_9_X) /interface lonfeedback.pm
raeburn
raeburn@source.lon-capa.org
Sun, 24 Jan 2010 03:13:56 -0000
raeburn Sun Jan 24 03:13:56 2010 EDT
Modified files: (Branch: version_2_9_X)
/loncom/interface lonfeedback.pm
Log:
- Backport 1.279.
Index: loncom/interface/lonfeedback.pm
diff -u loncom/interface/lonfeedback.pm:1.273.4.2 loncom/interface/lonfeedback.pm:1.273.4.3
--- loncom/interface/lonfeedback.pm:1.273.4.2 Sun Jan 24 02:39:35 2010
+++ loncom/interface/lonfeedback.pm Sun Jan 24 03:13:55 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Feedback
#
-# $Id: lonfeedback.pm,v 1.273.4.2 2010/01/24 02:39:35 raeburn Exp $
+# $Id: lonfeedback.pm,v 1.273.4.3 2010/01/24 03:13:55 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1482,7 +1482,6 @@
}
my %lt = &Apache::lonlocal::texthash(
- 'plch' => 'Please check at least one of the following feedback types:',
'myqu' => 'My question/comment/feedback:',
'title' => 'Title',
'reta' => 'Retained attachments',
@@ -1693,7 +1692,6 @@
END
}
$r->print(<<END);
-$lt{'plch'}
$options<hr />
$quote
<p>$lt{'myqu'}</p>
@@ -2639,12 +2637,12 @@
}
if ($msgoptions) {
$msgoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/res/adm/pages/com.png').'" />'
- .' '.&mt('Send Feedback').'</h2>'
+ .' '.&mt('Send Feedback').'</h2><p>'.&Apache::lonhtmlcommon::coursepreflink(&mt('Feedback Settings'),'feedback').'</p>'
.$msgoptions;
}
if ($discussoptions) {
$discussoptions='<h2><img src="'.&Apache::loncommon::lonhttpdurl('/adm/lonMisc/chat.gif').'" />'
- .' '.&mt('Discussion Contributions').'</h2>'
+ .' '.&mt('Discussion Contributions').'</h2><p>'.&Apache::lonhtmlcommon::coursepreflink(&mt('Discussion Settings'),'discussion').'</p>'
.$discussoptions;
}
return $msgoptions.$discussoptions;