--- loncom/interface/lonmsg.pm 2005/06/06 19:51:05 1.146
+++ loncom/interface/lonmsg.pm 2005/06/06 20:31:24 1.147
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging
#
-# $Id: lonmsg.pm,v 1.146 2005/06/06 19:51:05 www Exp $
+# $Id: lonmsg.pm,v 1.147 2005/06/06 20:31:24 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1798,11 +1798,11 @@ sub displaymessage {
}
if (&Apache::lonnet::allowed('opa',$env{'request.course.id'})) {
my $symb=&Apache::lonnet::symbread($content{'baseurl'});
- $r->print('
'.&Apache::loncommon::parm_direct_link(&mt('Set/Change parameters'),$content{'sendername'},$content{'senderdomain'},$symb,'check').' | ');
+ $r->print(''.&Apache::loncommon::pprmlink(&mt('Set/Change parameters'),$content{'sendername'},$content{'senderdomain'},$symb,'check').' | ');
}
if (&Apache::lonnet::allowed('mgr',$env{'request.course.id'})) {
my $symb=&Apache::lonnet::symbread($content{'baseurl'});
- $r->print(''.&Apache::loncommon::grds_direct_link(&mt('Set/Change grades'),$content{'sendername'},$content{'senderdomain'},$symb,'check').' | ');
+ $r->print(''.&Apache::loncommon::pgrdlink(&mt('Set/Change grades'),$content{'sendername'},$content{'senderdomain'},$symb,'check').' | ');
}
$r->print('');
}