loncom/interface/lonmsgdisplay.pm - diff

Return to lonmsgdisplay.pm CVS log

Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonmsgdisplay.pm between versions 1.98 and 1.100

version 1.98, 2008/11/25 21:59:24	version 1.100, 2008/12/05 19:38:32
Line 243 function folder_choice(targetform,caller	Line 243 function folder_choice(targetform,caller
</td><td> </td><td> </td><td> </td><td> </td>	</td><td> </td><td> </td><td> </td><td> </td>
<td align="right">	<td align="right">
<table><tr><td><br />	<table><tr><td><br />
<input type="button" value="'.&mt('Make New Folder').	<input type="button" value="'.&mt('New Folder').
'" onClick="javascript:folder_choice(this.form,'."'new'".');" /></td>'.	'" onClick="javascript:folder_choice(this.form,'."'new'".');" /></td>'.
'<td align="center"><b>'.&mt('New Folder').'</b><br />'.	'<td align="center"><b>'.&mt('Name').'</b><br />'.
'<input type="text" size="15" name="newfolder" value="" />	'<input type="text" size="15" name="newfolder" value="" />
</td></tr></table>	</td></tr></table>
</td>	</td>
Line 353 sub makefolder {	Line 353 sub makefolder {
}	}
} else {	} else {
$outcome =	$outcome =
&mt('Error - could not obtain lock on email folders record.');	&mt('Error - could not obtain lock on e-mail folders record.');
}	}
return ($outcome,$warning);	return ($outcome,$warning);
}	}
Line 718 sub groupmail_header {	Line 718 sub groupmail_header {
{href=>"/adm/email?compose=group&group=".	{href=>"/adm/email?compose=group&group=".
"$env{'form.group'}&$refarg",	"$env{'form.group'}&$refarg",
text=>"Send a Message in a Group",	text=>"Send a Message in a Group",
title=>"Compose Group E-mail"},);	title=>"Compose Group Message"},);
if ($action eq 'sending') {	if ($action eq 'sending') {
&Apache::lonhtmlcommon::add_breadcrumb	&Apache::lonhtmlcommon::add_breadcrumb
({text=>"E-mails being sent.",	({text=>"Messages being sent.",
title=>"E-mails sent"},);	title=>"E-mails sent"},);
}	}
my $groupheader = &Apache::loncommon::start_page('Group Email');	my $groupheader = &Apache::loncommon::start_page('Group Message');
$groupheader .= &Apache::lonhtmlcommon::breadcrumbs	$groupheader .= &Apache::lonhtmlcommon::breadcrumbs
('Group - '.$env{'form.group'}.' Email');	('Group - '.$env{'form.group'}.' Email');
return $groupheader;	return $groupheader;
Line 738 sub groupmail_sent {	Line 738 sub groupmail_sent {
}	}
my $output .= '<br /><br /><a href="/adm/email?compose=group&group='.	my $output .= '<br /><br /><a href="/adm/email?compose=group&group='.
$group.'&'.$refarg.'">'.	$group.'&'.$refarg.'">'.
&mt('Send another group email').'</a>'.'   '.	&mt('Send another group message').'</a>'.'   '.
'<a href="/adm/'.$cdom.'/'.$cnum.'/'.$group.'/smppg?'.	'<a href="/adm/'.$cdom.'/'.$cnum.'/'.$group.'/smppg?'.
$refarg.'">'. &mt('Return to group page').'</a>';	$refarg.'">'. &mt('Return to group page').'</a>';
return $output;	return $output;
Line 1287 sub compout {	Line 1287 sub compout {
$dispcrit=	$dispcrit=
'<span class="LC_nobreak"><label><input type="checkbox" name="critmsg" /> '.&mt('Send as critical message').'.</label>'.$crithelp.'  '.&mt('Require return receipt?').'<label><input type="radio" name="sendbck" value="1" />'.&mt('Yes').'</label>  <label><input type="radio" name="sendbck" value="" checked="checked" />'.&mt('No').'</label></span><br />'.	'<span class="LC_nobreak"><label><input type="checkbox" name="critmsg" /> '.&mt('Send as critical message').'.</label>'.$crithelp.'  '.&mt('Require return receipt?').'<label><input type="radio" name="sendbck" value="1" />'.&mt('Yes').'</label>  <label><input type="radio" name="sendbck" value="" checked="checked" />'.&mt('No').'</label></span><br />'.
'<label><input type="checkbox" name="permanent" /> '.	'<label><input type="checkbox" name="permanent" /> '.
&mt('Send copy to permanent email address (if known)').'</label><br />'.	&mt('Send copy to permanent e-mail address (if known)').'</label><br />'.
'<label><input type="checkbox" name="rsspost" /> '.	'<label><input type="checkbox" name="rsspost" /> '.
&mt('Include in course RSS newsfeed').'</label><br />';	&mt('Include in course RSS newsfeed').'</label><br />';
}	}

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.98
changed lines
	Added in v.1.100