loncom/interface/lonannounce.pm - diff

Return to lonannounce.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.73, 2008/10/13 15:33:02	version 1.75, 2008/12/10 21:46:58
Line 53 sub editfield {	Line 53 sub editfield {
my $enddateform = &Apache::lonhtmlcommon::date_setter('anno',	my $enddateform = &Apache::lonhtmlcommon::date_setter('anno',
'enddate',	'enddate',
$end);	$end);
my $help=&Apache::loncommon::help_open_menu('Calendar Add Announcement','Calendar_Add_Announcement',274,'Communication Tools');	#my $help=&Apache::loncommon::help_open_menu('Calendar Add Announcement','Calendar_Add_Announcement',274,'Communication Tools');
	my $help=&Apache::loncommon::help_open_topic('Calendar_Add_Announcement');

my %lt=&Apache::lonlocal::texthash('annon' => 'Course Announcements',	my %lt=&Apache::lonlocal::texthash('annon' => 'Course Announcements',
'post' => 'Post Announcement',	'post' => 'Post Announcement',
'start' => 'Starting date',	'start' => 'Starting date',
Line 536 ENDDOCUMENT	Line 538 ENDDOCUMENT
&dialscript().	&dialscript().
'<font size="1">');	'<font size="1">');
} else {	} else {
$r->print(&Apache::loncommon::start_page("Announcements and Calendar",	my @brcrum = [{href=>"/adm/announcements",text=>"Announcements and Calendar"}];
$js));	$r->print(&Apache::loncommon::start_page("Announcements and Calendar",$js,{'bread_crumbs' => @brcrum}));
}	}
# does this user have privileges to post, etc?	# does this user have privileges to post, etc?
my $allowed=0;	my $allowed=0;