version 1.270, 2010/04/12 01:22:49
|
version 1.271, 2010/04/13 10:21:29
|
Line 1993 sub resource_info_box {
|
Line 1993 sub resource_info_box {
|
my ($symb,$onlyfolderflag)=@_; |
my ($symb,$onlyfolderflag)=@_; |
my $return=''; |
my $return=''; |
if ($symb) { |
if ($symb) { |
my $title=&Apache::lonnet::gettitle($symb); |
|
$return=&Apache::loncommon::start_data_table(); |
$return=&Apache::loncommon::start_data_table(); |
unless ($onlyfolderflag) { |
|
$return.=&Apache::loncommon::start_data_table_row(). |
|
'<th>'.&mt('Resource:').'</th><td>'.$title.'</td>'. |
|
&Apache::loncommon::end_data_table_row(); |
|
} |
|
my ($map,$id,$resource)=&Apache::lonnet::decode_symb($symb); |
my ($map,$id,$resource)=&Apache::lonnet::decode_symb($symb); |
my $folder=&Apache::lonnet::gettitle($map); |
my $folder=&Apache::lonnet::gettitle($map); |
$return.=&Apache::loncommon::start_data_table_row(). |
$return.=&Apache::loncommon::start_data_table_row(). |
'<th>'.&mt('Folder:').'</th><td>'.$folder.'</td>'. |
'<th>'.&mt('Folder:').'</th><td>'.$folder.'</td>'. |
&Apache::loncommon::end_data_table_row(). |
&Apache::loncommon::end_data_table_row(); |
&Apache::loncommon::end_data_table(); |
unless ($onlyfolderflag) { |
|
$return.=&Apache::loncommon::start_data_table_row(). |
|
'<th>'.&mt('Resource:').'</th><td>'.&Apache::lonnet::gettitle($symb).'</td>'. |
|
&Apache::loncommon::end_data_table_row(); |
|
} |
|
$return.=&Apache::loncommon::end_data_table(); |
} else { |
} else { |
$return='<p><span class="LC_error">'.&mt('No context provided.').'</span></p>'; |
$return='<p><span class="LC_error">'.&mt('No context provided.').'</span></p>'; |
} |
} |