--- loncom/xml/lonlatextable.pm 2010/08/27 09:42:48 1.2 +++ loncom/xml/lonlatextable.pm 2011/04/13 10:44:26 1.4 @@ -1,6 +1,6 @@ # Generating TeX tables. # -# $Id: lonlatextable.pm,v 1.2 2010/08/27 09:42:48 foxr Exp $ +# $Id: lonlatextable.pm,v 1.4 2011/04/13 10:44:26 foxr Exp $ # # # Copyright Michigan State University Board of Trustees @@ -146,6 +146,8 @@ These produce a horizontal rule that spa =back +Calling this multiple times will continue to append cell data. + =head3 Example $table->set_data([ ['Gnu', '92.52'], [], ['Emu', '33.33'] ]); @@ -157,11 +159,15 @@ Produces | Emu | 33.33 | +--------------+--------------+ + =cut sub set_data { my ($self, $data) = @_; - $self->{'data'} = $data; + my $current_data = $self->{'data'}; + push (@$current_data, @$data); + $self->{'data'} = $current_data; + }