[LON-CAPA-cvs] cvs: loncom(version_2_9_X) /interface lonuserutils.pm
raeburn
raeburn@source.lon-capa.org
Fri, 20 Aug 2010 20:28:21 -0000
raeburn Fri Aug 20 20:28:21 2010 EDT
Modified files: (Branch: version_2_9_X)
/loncom/interface lonuserutils.pm
Log:
- Backport 1.121.
Index: loncom/interface/lonuserutils.pm
diff -u loncom/interface/lonuserutils.pm:1.97.2.17 loncom/interface/lonuserutils.pm:1.97.2.18
--- loncom/interface/lonuserutils.pm:1.97.2.17 Sat May 22 13:33:09 2010
+++ loncom/interface/lonuserutils.pm Fri Aug 20 20:28:21 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Utility functions for managing LON-CAPA user accounts
#
-# $Id: lonuserutils.pm,v 1.97.2.17 2010/05/22 13:33:09 raeburn Exp $
+# $Id: lonuserutils.pm,v 1.97.2.18 2010/08/20 20:28:21 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -4677,12 +4677,12 @@
}
} elsif ($choice eq 'chgdates') {
$r->print(&mt("$result_text{'ok'}{$choice} role of '[_1]' in [_2] for '[_3]' - [_4]",$plrole,$extent,
- '<i>'.&Apache::loncommon::plainname($uname.':'.$udom).'</i>',
+ '<i>'.&Apache::loncommon::plainname($uname,$udom).'</i>',
$dates).'<br />');
$count ++;
} else {
$r->print(&mt("$result_text{'ok'}{$choice} role of '[_1]' in [_2] for '[_3]'.",$plrole,$extent,
- '<i>'.&Apache::loncommon::plainname($uname.':'.$udom).'</i>').
+ '<i>'.&Apache::loncommon::plainname($uname,$udom).'</i>').
'<br />');
$count ++;
}
@@ -4690,7 +4690,7 @@
$r->print(
&mt("Error $result_text{'error'}{$choice} [_1] in [_2] for '[_3]': [_4].",
$plrole,$extent,
- '<i>'.&Apache::loncommon::plainname($uname.':'.$udom).'</i>',
+ '<i>'.&Apache::loncommon::plainname($uname,$udom).'</i>',
$result).'<br />');
}
}