version 1.202, 2008/12/10 21:46:58
|
version 1.204, 2009/01/03 19:14:19
|
Line 138 END
|
Line 138 END
|
.'<form method="post" action="'.$escuri.'">' |
.'<form method="post" action="'.$escuri.'">' |
.'<fieldset>' |
.'<fieldset>' |
.'<legend>'.$lt{'createdir_label'}.'</legend>' |
.'<legend>'.$lt{'createdir_label'}.'</legend>' |
.'<input name="newdir" type="input" />'.$groupitem |
.'<input name="newdir" type="text" />'.$groupitem |
.'<input type="hidden" name="currentpath" value="'.$current_path.'" />' |
.'<input type="hidden" name="currentpath" value="'.$current_path.'" />' |
.'<input type="hidden" name="action" value="'.$env{"form.action"}.'" />' |
.'<input type="hidden" name="action" value="'.$env{"form.action"}.'" />' |
.'<input type="hidden" name="fieldname" value="'.$env{"form.fieldname"}.'" />' |
.'<input type="hidden" name="fieldname" value="'.$env{"form.fieldname"}.'" />' |
Line 694 sub rename {
|
Line 694 sub rename {
|
} else { |
} else { |
&open_form($r,$url); |
&open_form($r,$url); |
$r->print('<p>'.&mt('Rename [_1] to [_2]?', &display_file() |
$r->print('<p>'.&mt('Rename [_1] to [_2]?', &display_file() |
, '<input name="filenewname" type="input" size="50" />').'</p>'); |
, '<input name="filenewname" type="text" size="50" />').'</p>'); |
&close_form($r,$url); |
&close_form($r,$url); |
} |
} |
} |
} |
Line 2245 sub handler {
|
Line 2245 sub handler {
|
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |
$r->send_http_header; |
$r->send_http_header; |
# Give the LON-CAPA page header |
# Give the LON-CAPA page header |
my @brcrum = [{href=>"/adm/portfolio",text=>"Portfolio Manager"}]; |
my $brcrum = [{href=>"/adm/portfolio",text=>"Portfolio Manager"}]; |
|
|
if ($env{"form.mode"} eq 'selectfile'){ |
if ($env{"form.mode"} eq 'selectfile'){ |
$r->print(&Apache::loncommon::start_page($title,undef, |
$r->print(&Apache::loncommon::start_page($title,undef, |
{'only_body' => 1})); |
{'only_body' => 1})); |
Line 2253 sub handler {
|
Line 2254 sub handler {
|
$r->print(&Apache::loncommon::start_page('New role-based condition',undef, |
$r->print(&Apache::loncommon::start_page('New role-based condition',undef, |
{'no_nav_bar' => 1, })); |
{'no_nav_bar' => 1, })); |
} else { |
} else { |
$r->print(&Apache::loncommon::start_page($title,undef,{bread_crumbs => @brcrum})); |
$r->print(&Apache::loncommon::start_page($title,undef, |
|
{'bread_crumbs' => $brcrum})); |
} |
} |
$r->rflush(); |
$r->rflush(); |
if (!&Apache::lonnet::usertools_access($uname,$udom,'portfolio')) { |
if (!&Apache::lonnet::usertools_access($uname,$udom,'portfolio')) { |