version 1.247, 2003/10/02 15:33:03
|
version 1.248, 2003/10/02 19:10:06
|
Line 1352 CHOOSE_FROM_SUBDIR
|
Line 1352 CHOOSE_FROM_SUBDIR
|
# another resource selector for that sequence |
# another resource selector for that sequence |
if (!$helper->{VARS}->{'construction'}) { |
if (!$helper->{VARS}->{'construction'}) { |
push @$printChoices, ["Resources from <b>selected sequence</b> in course", |
push @$printChoices, ["Resources from <b>selected sequence</b> in course", |
'map_problems_pages', 'CHOOSE_SEQUENCE']; |
'selected_sequence', 'CHOOSE_SEQUENCE']; |
my $escapedSequenceName = $helper->{VARS}->{'SEQUENCE'}; |
my $escapedSequenceName = $helper->{VARS}->{'SEQUENCE'}; |
#Escape apostrophes and backslashes for Perl |
#Escape apostrophes and backslashes for Perl |
$escapedSequenceName =~ s/\\/\\\\/g; |
$escapedSequenceName =~ s/\\/\\\\/g; |