[LON-CAPA-cvs] cvs: loncom /interface lonmsgdisplay.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Sat, 23 Dec 2006 06:19:11 -0000
albertel Sat Dec 23 01:19:11 2006 EDT
Modified files:
/loncom/interface lonmsgdisplay.pm
Log:
- a few messages missing the "" around the folder name
- one &mt was missing the $folder argument
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.55 loncom/interface/lonmsgdisplay.pm:1.56
--- loncom/interface/lonmsgdisplay.pm:1.55 Fri Dec 22 23:39:32 2006
+++ loncom/interface/lonmsgdisplay.pm Sat Dec 23 01:19:10 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging display
#
-# $Id: lonmsgdisplay.pm,v 1.55 2006/12/23 04:39:32 albertel Exp $
+# $Id: lonmsgdisplay.pm,v 1.56 2006/12/23 06:19:10 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -381,18 +381,18 @@
my ($folder)=@_;
my %permfolders = &get_permanent_folders();
if (defined($permfolders{$folder})) {
- return &mt('The folder [_1] may not be deleted',$folder);
+ return &mt('The folder "[_1]" may not be deleted',$folder);
}
my %userfolders = &Apache::lonmsg::get_user_folders();
if (!defined($userfolders{$folder})) {
- return &mt('The folder [_1] does not exist so deletion is not required.',
+ return &mt('The folder "[_1]" does not exist so deletion is not required.',
$folder);
}
# check folder is empty;
my $suffix=&Apache::lonmsg::foldersuffix($folder);
my @messages = &Apache::lonnet::getkeys('nohist_email'.$suffix);
if (@messages > 0) {
- return &mt('The folder [_1] contains messages so it may not be deleted.').
+ return &mt('The folder "[_1]" contains messages so it may not be deleted.',$folder).
'<br />'.
&mt('Delete or move the messages to a different folder first.');
}