version 1.163, 2006/08/04 22:14:38
|
version 1.167, 2006/08/10 21:14:10
|
Line 170 sub authordisplay {
|
Line 170 sub authordisplay {
|
my ($aname,$adom)=@_; |
my ($aname,$adom)=@_; |
return &Apache::loncommon::aboutmewrapper |
return &Apache::loncommon::aboutmewrapper |
(&Apache::loncommon::plainname($aname,$adom), |
(&Apache::loncommon::plainname($aname,$adom), |
$aname,$adom,'preview').' <tt>['.$aname.'@'.$adom.']</tt>'; |
$aname,$adom,'preview').' <tt>['.$aname.':'.$adom.']</tt>'; |
} |
} |
|
|
# Pretty display |
# Pretty display |
Line 287 sub portfolio_linked_path {
|
Line 287 sub portfolio_linked_path {
|
if ($group) { |
if ($group) { |
$start = "groups/$group/".$start; |
$start = "groups/$group/".$start; |
} |
} |
my $result = &Apache::portfolio::make_anchor($port_path,$start,'/'); |
my %anchor_fields = ( |
|
'selectfile' => $start, |
|
'currentpath' => '/' |
|
); |
|
my $result = &Apache::portfolio::make_anchor($port_path,\%anchor_fields,$start); |
my $fullpath = '/'; |
my $fullpath = '/'; |
my (undef,@tree) = split('/',$path); |
my (undef,@tree) = split('/',$path); |
my $filename = pop(@tree); |
my $filename = pop(@tree); |
foreach my $dir (@tree) { |
foreach my $dir (@tree) { |
$fullpath .= $dir.'/'; |
$fullpath .= $dir.'/'; |
$result .= '/'; |
$result .= '/'; |
$result .= &Apache::portfolio::make_anchor($port_path,$dir,$fullpath); |
my %anchor_fields = ( |
|
'selectfile' => $dir, |
|
'currentpath' => $fullpath |
|
); |
|
$result .= &Apache::portfolio::make_anchor($port_path,\%anchor_fields,$dir); |
} |
} |
$result .= "/$filename"; |
$result .= "/$filename"; |
return $result; |
return $result; |
Line 358 sub pre_select_course {
|
Line 365 sub pre_select_course {
|
$r->print('<p>'.&mt('If you would like to associate this resource ([_1]) with a current or previous course, please select one from the list below, otherwise select, \'None\'','<tt>'.$res_uri.'</tt>').'</p>'); |
$r->print('<p>'.&mt('If you would like to associate this resource ([_1]) with a current or previous course, please select one from the list below, otherwise select, \'None\'','<tt>'.$res_uri.'</tt>').'</p>'); |
$output = &select_course(); |
$output = &select_course(); |
$r->print($output.'<br /><input type="submit" name="store" value="'. |
$r->print($output.'<br /><input type="submit" name="store" value="'. |
&mt('Associate Resource With Selected Course').'">'); |
&mt('Associate Resource With Selected Course').'" />'); |
$r->print('</form>'); |
$r->print('</form>'); |
|
|
my ($port_path,$group) = &get_port_path_and_group($uri); |
my ($port_path,$group) = &get_port_path_and_group($uri); |
$r->print('<br /><br /><form method="POST" action="'.$port_path.'">'. |
my $group_input; |
|
if ($group) { |
|
$group_input = '<input type="hidden" name="group" value="'.$group.'" />' |
|
} else { |
|
$group_input = ""; |
|
} |
|
$r->print('<br /><br /><form method="post" action="'.$port_path.'">'. |
'<input type="hidden" name="currentpath" value="'.$path.'" />'. |
'<input type="hidden" name="currentpath" value="'.$path.'" />'. |
'<input type="hidden" name="group" value="'.$group.'" />'. |
$group_input. |
'<input type="submit" name="cancel" value="'.&mt('Cancel').'">'. |
'<input type="submit" name="cancel" value="'.&mt('Cancel').'" />'. |
'</form>'); |
'</form>'); |
|
|
return; |
return; |