|
version 1.170, 2013/09/04 14:51:00
|
version 1.172, 2014/01/16 16:34:01
|
|
Line 380 sub deletefolder {
|
Line 380 sub deletefolder {
|
| my ($folder)=@_; |
my ($folder)=@_; |
| my %permfolders = &get_permanent_folders(); |
my %permfolders = &get_permanent_folders(); |
| if (defined($permfolders{$folder})) { |
if (defined($permfolders{$folder})) { |
| return &mt('The folder "[_1]" may not be deleted.',$folder); |
return &mt('The folder "[_1]" may not be deleted.',$permfolders{$folder}); |
| } |
} |
| my %userfolders = &Apache::lonmsg::get_user_folders(); |
my %userfolders = &Apache::lonmsg::get_user_folders(); |
| if (!defined($userfolders{$folder})) { |
if (!defined($userfolders{$folder})) { |
|
Line 2162 sub displaymessage {
|
Line 2162 sub displaymessage {
|
| |
|
| if (&Apache::lonnet::allowed('vgr',$env{'request.course.id'})) { |
if (&Apache::lonnet::allowed('vgr',$env{'request.course.id'})) { |
| push(@actionlist,&Apache::loncommon::track_student_link( |
push(@actionlist,&Apache::loncommon::track_student_link( |
| &mt('View recent activity') |
'View recent activity' |
| ,$content{'sendername'} |
,$content{'sendername'} |
| ,$content{'senderdomain'} |
,$content{'senderdomain'} |
| ,'check')); |
,'check')); |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonmsgdisplay.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface