version 1.140, 2003/06/19 15:30:58
|
version 1.141, 2003/06/19 18:45:57
|
Line 1701 sub end_dd {
|
Line 1701 sub end_dd {
|
#-- <table> tag |
#-- <table> tag |
sub start_table { |
sub start_table { |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval) = @_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval) = @_; |
my $textwidth; |
my $textwidth=''; |
if (not defined @Apache::londefdef::table) { |
if (not defined @Apache::londefdef::table) { |
$textwidth=&recalc($ENV{'form.textwidth'}); |
$textwidth=&recalc($ENV{'form.textwidth'}); |
$textwidth=~/(\d+\.?\d*)/; |
$textwidth=~/(\d+\.?\d*)/; |
Line 1747 sub start_table {
|
Line 1747 sub start_table {
|
$Apache::londefdef::table[-1]{'vvinc'} = ''; |
$Apache::londefdef::table[-1]{'vvinc'} = ''; |
} |
} |
$Apache::londefdef::table[-1]{'output'} = ' \noindent \begin{tabular} '; |
$Apache::londefdef::table[-1]{'output'} = ' \noindent \begin{tabular} '; |
$currentstring = '\keephidden{NEW TABLE ENTRY '.$textwidth.'}'; |
$currentstring = '\keephidden{NEW TABLE ENTRY '.$textwidth.' }'; |
} |
} |
return $currentstring; |
return $currentstring; |
} |
} |
Line 1825 sub end_table {
|
Line 1825 sub end_table {
|
} else { |
} else { |
$currentstring .= $Apache::londefdef::table[-1]{'output'}; |
$currentstring .= $Apache::londefdef::table[-1]{'output'}; |
pop @Apache::londefdef::table; |
pop @Apache::londefdef::table; |
|
undef @Apache::londefdef::table; |
} |
} |
} |
} |
return $currentstring; |
return $currentstring; |