loncom/interface/lonmeta.pm - diff

Return to lonmeta.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.203, 2007/01/23 04:25:56	version 1.204, 2007/03/12 19:10:48
Line 804 sub handler {	Line 804 sub handler {
&present_editable_metadata($r,$uri,'groups');	&present_editable_metadata($r,$uri,'groups');
} elsif ($uri=~m\|^/~\|) {	} elsif ($uri=~m\|^/~\|) {
# Construction space	# Construction space
$r->print(&Apache::loncommon::start_page('Edit Catalog nformation',	$r->print(&Apache::loncommon::start_page('Edit Catalog Information',
undef,	"\n".'<script type="text/javascript">'."\n".
	&Apache::loncommon::browser_and_searcher_javascript().
	"\n".'</script>',
{'domain' => $resdomain,}));	{'domain' => $resdomain,}));
&present_editable_metadata($r,$uri);	&present_editable_metadata($r,$uri);
} else {	} else {
Line 1255 ENDDEL	Line 1257 ENDDEL
<h1>$displayfile</h1>	<h1>$displayfile</h1>
<form method="post" action="" name="defaultmeta">	<form method="post" action="" name="defaultmeta">
ENDEDIT	ENDEDIT
$r->print('<script type="JavaScript">'.
&Apache::loncommon::browser_and_searcher_javascript().
'</script>');
my %lt=&fieldnames($file_type);	my %lt=&fieldnames($file_type);
my $output;	my $output;
my @fields;	my @fields;