--- loncom/interface/lonmsg.pm 2012/05/07 17:34:11 1.233 +++ loncom/interface/lonmsg.pm 2013/07/24 18:21:39 1.235 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines for messaging # -# $Id: lonmsg.pm,v 1.233 2012/05/07 17:34:11 bisitz Exp $ +# $Id: lonmsg.pm,v 1.235 2013/07/24 18:21:39 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -526,7 +526,7 @@ sub sendnotification { to access the full message.',$url); my %userenv = &Apache::lonnet::get('environment',['notifywithhtml'],$toudom,$touname); - my $subject = &mt_user($user_lh,"'New' $critical message from ").$sender; + my $subject = &mt_user($user_lh,"'New'$critical message from [_1]",$sender); unless ($subj eq '') { $subject = $subj; } @@ -622,7 +622,6 @@ sub author_res_msg { sub retrieve_author_res_msg { my $url=shift; $url=&Apache::lonnet::declutter($url); - $url=~s/^priv\///; # Respect new authorspace path (BZ 1320) my ($domain,$author)=($url=~/^($match_domain)\/($match_username)\//); my %errormsgs=&Apache::lonnet::dump('nohist_res_msgs',$domain,$author); my $msgs='';