1 package Excel::Template::TextObject;
7 @ISA = qw(Excel::Template::Base);
9 use Excel::Template::Base;
11 UNI_YES use Unicode::String;
14 # This is a helper object. It is not instantiated by the user,
15 # nor does it represent an XML object. Rather, certain elements,
16 # such as <textbox>, can use this object to do text with variable
22 my $self = $class->SUPER::new(@_);
24 $self->{STACK} = [] unless UNIVERSAL::isa($self->{STACK}, 'ARRAY');
34 UNI_YES my $t = Unicode::String::utf8('');
37 for my $tok (@{$self->{STACK}})
40 $val = $val->resolve($context)
41 if Excel::Template::Factory::is_embedded( $val );
43 UNI_YES $t .= Unicode::String::utf8("$val");
55 Excel::Template::TextObject
75 Rob Kinyon (rob.kinyon@gmail.com)