version 1.38, 2013/04/11 14:59:58
|
version 1.39, 2013/06/04 22:20:16
|
Line 1776 sub print_header {
|
Line 1776 sub print_header {
|
my ($uname,$udom,$javascript,$loadentries,$title,$current_page,$pagesref, |
my ($uname,$udom,$javascript,$loadentries,$title,$current_page,$pagesref, |
$namesref) = @_; |
$namesref) = @_; |
my $brcrum = [{'href' => &Apache::loncommon::authorspace("/priv/$udom/$uname/"), |
my $brcrum = [{'href' => &Apache::loncommon::authorspace("/priv/$udom/$uname/"), |
'text' => 'Construction Space'}]; |
'text' => 'Authoring Space'}]; |
if ($env{'form.phase'} eq 'three') { |
if ($env{'form.phase'} eq 'three') { |
if (ref($pagesref) eq 'ARRAY') { |
if (ref($pagesref) eq 'ARRAY') { |
for (my $i=0; $i<$current_page; $i++) { |
for (my $i=0; $i<$current_page; $i++) { |
Line 1838 sub handler {
|
Line 1838 sub handler {
|
my $page_name = ''; |
my $page_name = ''; |
my $current_page = ''; |
my $current_page = ''; |
my $qcount = ''; |
my $qcount = ''; |
my $title = 'Upload testbank questions to Construction Space'; |
my $title = 'Upload testbank questions to Authoring Space'; |
|
|
# ----------------------------------------------------------- Start page output |
# ----------------------------------------------------------- Start page output |
&Apache::loncommon::content_type($r,'text/html'); |
&Apache::loncommon::content_type($r,'text/html'); |