version 1.106, 2003/01/27 16:01:13
|
version 1.107, 2003/01/28 20:36:17
|
Line 162 sub sequence_content_menu {
|
Line 162 sub sequence_content_menu {
|
my @titles_master_seq = &titles_coming_from_hash($primary_sequence,$sequence[0]); |
my @titles_master_seq = &titles_coming_from_hash($primary_sequence,$sequence[0]); |
foreach my $entity (@titles_master_seq) {$entity=~/^(.*)&&/; $entity=$1} |
foreach my $entity (@titles_master_seq) {$entity=~/^(.*)&&/; $entity=$1} |
my @master_seq_view = @master_seq; |
my @master_seq_view = @master_seq; |
if (not $ENV{'request.role'}=~/^st\./) { |
if ($ENV{'user.adv'}) { |
for (my $i=0;$i<=$#master_seq_view;$i++) { |
for (my $i=0;$i<=$#master_seq_view;$i++) { |
$master_seq_view[$i]=~/___\d+___(.+)$/; |
$master_seq_view[$i]=~/___\d+___(.+)$/; |
$master_seq_view[$i]='/'.$1; |
$master_seq_view[$i]='/'.$1; |
} |
} |
} else { |
} else { |
for (my $i=0;$i<=$#master_seq_view;$i++) { |
for (my $i=0;$i<=$#master_seq_view;$i++) { |
$master_seq_view[$i]=' '; |
$master_seq_view[$i]=' '; |
} |
} |
} |
} |
$r->print(<<ENDMENUOUT1); |
$r->print(<<ENDMENUOUT1); |
Line 216 ENDMENUOUT1
|
Line 216 ENDMENUOUT1
|
} |
} |
} |
} |
$r->print(<<ENDMENUOUT2); |
$r->print(<<ENDMENUOUT2); |
<br /> |
<br /><br /> |
<input type="hidden" name="numberoffiles" value="$inc"> |
<input type="hidden" name="numberoffiles" value="$inc"> |
<input type="hidden" name="phase" value="three"> |
<input type="hidden" name="phase" value="three"> |
|
<input type=button onClick="checkall()" value="Check All"> |
|
<input type=button onClick="uncheckall()" value="Uncheck"> |
<input type="submit" value="Submit"> |
<input type="submit" value="Submit"> |
ENDMENUOUT2 |
ENDMENUOUT2 |
|
|
Line 277 sub problem_choice_menu {
|
Line 279 sub problem_choice_menu {
|
} |
} |
</script> |
</script> |
<input type=button onClick="checkall()" value="Check All"> |
<input type=button onClick="checkall()" value="Check All"> |
<input type=button onClick="uncheckall()" value="Uncheck"> |
<input type=button onClick="uncheckall()" value="Uncheck"> |
|
<input type="submit" value="Submit"> |
<p> |
<p> |
ENDMENUOUT1 |
ENDMENUOUT1 |
my $i=0; |
my $i=0; |
Line 287 ENDMENUOUT1
|
Line 290 ENDMENUOUT1
|
$i++; |
$i++; |
} |
} |
$r->print(<<ENDMENUOUT2); |
$r->print(<<ENDMENUOUT2); |
<br /> |
<br /><br /> |
<input type="hidden" name="papersize" value="$ENV{'form.papersize'}"> |
<input type="hidden" name="papersize" value="$ENV{'form.papersize'}"> |
<input type="hidden" name="numberofproblems" value="$i"> |
<input type="hidden" name="numberofproblems" value="$i"> |
<input type="hidden" name="phase" value="three"> |
<input type="hidden" name="phase" value="three"> |
|
<input type=button onClick="checkall()" value="Check All"> |
|
<input type=button onClick="uncheckall()" value="Uncheck"> |
<input type="submit" value="Submit"> |
<input type="submit" value="Submit"> |
ENDMENUOUT2 |
ENDMENUOUT2 |
} |
} |