version 1.220, 2013/08/12 16:44:08
|
version 1.222, 2014/12/11 01:46:17
|
Line 623 END
|
Line 623 END
|
|
|
|
|
# ----------------- read in what directories have previously been set to "open" |
# ----------------- read in what directories have previously been set to "open" |
foreach (keys %hash) { |
foreach (keys(%hash)) { |
if ($_ =~ /^diropen_status_/) { |
if ($_ =~ /^diropen_status_/) { |
my $key = $_; |
my $key = $_; |
$key =~ s/^diropen_status_//; |
$key =~ s/^diropen_status_//; |
Line 754 sub get_list {
|
Line 754 sub get_list {
|
|
|
(my $luri = $uri) =~ s/\//_/g; |
(my $luri = $uri) =~ s/\//_/g; |
if ($env{'form.updatedisplay'}) { |
if ($env{'form.updatedisplay'}) { |
foreach (keys %hash) { |
foreach (keys(%hash)) { |
delete $hash{$_} if ($_ =~ /^dirlist_files_/); |
delete $hash{$_} if ($_ =~ /^dirlist_files_/); |
delete $hash{$_} if ($_ =~ /^dirlist_timestamp_files_/); |
delete $hash{$_} if ($_ =~ /^dirlist_timestamp_files_/); |
} |
} |
Line 1000 $r->print ('<input type="hidden" name="a
|
Line 1000 $r->print ('<input type="hidden" name="a
|
# Wishlistlink |
# Wishlistlink |
$r->print('</form></td><td><a href="javascript:;" '. |
$r->print('</form></td><td><a href="javascript:;" '. |
'title="'.&mt('Save a link for this folder in your personal Stored Links repository').'" '. |
'title="'.&mt('Save a link for this folder in your personal Stored Links repository').'" '. |
'onclick="set_wishlistlink('."'$plainname','$startdir$listname'".')">'. |
'onclick="set_wishlistlink('."'$plainname','$startdir$listname"."/'".')">'. |
'<img class="LC_icon" src="/res/adm/pages/wishlist.png" '. |
'<img class="LC_icon" src="/res/adm/pages/wishlist.png" '. |
'alt="'.&mt('save in Stored Links').'" style="width:22px;"/></a>'.$tabtag); |
'alt="'.&mt('save in Stored Links').'" style="width:22px;"/></a>'.$tabtag); |
$r->print(&Apache::loncommon::end_data_table_row()); |
$r->print(&Apache::loncommon::end_data_table_row()); |
Line 1250 $r->print ('<input type="hidden" name="a
|
Line 1250 $r->print ('<input type="hidden" name="a
|
# Wishlistlink |
# Wishlistlink |
$r->print('</td><td><a href="javascript:;" '. |
$r->print('</td><td><a href="javascript:;" '. |
'title="'.&mt('Save a link for this folder in Stored Links').'" '. |
'title="'.&mt('Save a link for this folder in Stored Links').'" '. |
'onclick="set_wishlistlink('."'$listname','$startdir$listname'".')">'. |
'onclick="set_wishlistlink('."'$listname','$startdir$listname"."/'".')">'. |
'<img class="LC_icon" src="/res/adm/pages/wishlist.png" '. |
'<img class="LC_icon" src="/res/adm/pages/wishlist.png" '. |
'alt="'.&mt('save in Stored Links').'" style="width:22px;"/></a></td>'); |
'alt="'.&mt('save in Stored Links').'" style="width:22px;"/></a></td>'); |
# Attributes |
# Attributes |
Line 1297 $r->print ('<input type="hidden" name="a
|
Line 1297 $r->print ('<input type="hidden" name="a
|
} |
} |
if ($hash{'display_attrs_7'} == 1) { |
if ($hash{'display_attrs_7'} == 1) { |
$r->print('<td> </td>'); |
$r->print('<td> </td>'); |
} |
} |
if ($hash{'display_attrs_11'} == 1) { |
if ($hash{'display_attrs_11'} == 1) { |
$r->print('<td> </td>'); |
$r->print('<td> </td>'); |
} |
} |
if ($hash{'display_attrs_12'} == 1) { |
if ($hash{'display_attrs_12'} == 1) { |
Line 1432 sub start_fresh_session {
|
Line 1432 sub start_fresh_session {
|
delete $hash->{'form.element'}; |
delete $hash->{'form.element'}; |
delete $hash->{'form.omit'}; |
delete $hash->{'form.omit'}; |
delete $hash->{'form.only'}; |
delete $hash->{'form.only'}; |
foreach (keys %{$hash}) { |
foreach (keys(%{$hash})) { |
delete $hash->{$_} if (/^(pre_|store)/); |
delete $hash->{$_} if (/^(pre_|store)/); |
} |
} |
} |
} |