|
version 1.277, 2004/12/11 18:10:49
|
version 1.279, 2005/02/12 02:18:08
|
|
Line 142 sub get_resource_name {
|
Line 142 sub get_resource_name {
|
| if (defined($Apache::lonhomework::name)) { |
if (defined($Apache::lonhomework::name)) { |
| return $Apache::lonhomework::name; |
return $Apache::lonhomework::name; |
| } |
} |
| my $name=&Apache::lonnet::gettitle(); |
my ($symb)=&Apache::lonxml::whichuser(); |
| |
my $name=&Apache::lonnet::gettitle($symb); |
| if ($name eq '') { |
if ($name eq '') { |
| $name=&Apache::lonnet::EXT('resource.title'); |
$name=&Apache::lonnet::EXT('resource.title'); |
| if ($name eq 'con_lost') { $name = ''; } |
if ($name eq 'con_lost') { $name = ''; } |
|
Line 1375 sub start_simpleeditbutton {
|
Line 1376 sub start_simpleeditbutton {
|
| (&Apache::lonnet::allowed('srm',$ENV{'request.course.id'}))) { |
(&Apache::lonnet::allowed('srm',$ENV{'request.course.id'}))) { |
| my $url=$ENV{'request.noversionuri'}; |
my $url=$ENV{'request.noversionuri'}; |
| $url=~s/\?.*$//; |
$url=~s/\?.*$//; |
| |
my ($symb) = &Apache::lonxml::whichuser(); |
| $result='<table width="100%" bgcolor="#FFFFAA" border="2"><tr><td>'. |
$result='<table width="100%" bgcolor="#FFFFAA" border="2"><tr><td>'. |
| '<a href="'.$url.'/smpedit">'.&mt('Edit').'</a> - '.&mt('Note: it can take up to 10 minutes for changes to take effect for all users.'). |
'<a href="'.$url.'/smpedit?symb='.&Apache::lonnet::escape($symb).'">'.&mt('Edit').'</a> - '.&mt('Note: it can take up to 10 minutes for changes to take effect for all users.'). |
| &Apache::loncommon::help_open_topic('Caching').'</td></tr></table><br />'; |
&Apache::loncommon::help_open_topic('Caching').'</td></tr></table><br />'; |
| } |
} |
| return $result; |
return $result; |
![[BACK]](/icons/back.gif){kind=icon}
Return to structuretags.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework