version 1.30, 2002/01/02 14:33:50
|
version 1.31, 2002/01/03 22:09:49
|
Line 26
|
Line 26
|
# http://www.lon-capa.org/ |
# http://www.lon-capa.org/ |
# |
# |
# 12/15/01 Matthew |
# 12/15/01 Matthew |
# 12/17 12/18 12/19 12/20 12/21 12/27 12/28 12/30 Matthew |
# 12/17 12/18 12/19 12/20 12/21 12/27 12/28 12/30 12/31 Matthew |
|
# 01/01/02 Matthew |
|
# 01/02 01/03 Matthew |
package Apache::lonplot; |
package Apache::lonplot; |
|
|
use strict; |
use strict; |
Line 466 sub start_label {
|
Line 468 sub start_label {
|
&get_attributes(\%label,\%label_defaults,$parstack,$safeeval, |
&get_attributes(\%label,\%label_defaults,$parstack,$safeeval, |
$tagstack->[-1]); |
$tagstack->[-1]); |
$label{'text'} = &Apache::lonxml::get_all_text("/label",$$parser[-1]); |
$label{'text'} = &Apache::lonxml::get_all_text("/label",$$parser[-1]); |
|
$label{'text'} =~ s/[\-\:\`\'\"\,\.]//g; |
if (! &$words_test($label{'text'})) { |
if (! &$words_test($label{'text'})) { |
# I should probably warn about it, too. |
# I should probably warn about it, too. |
$label{'text'} = 'Illegal text'; |
$label{'text'} = 'Illegal text'; |