Changeset 13171

Timestamp:

2006-10-27T13:38:54+13:00 (18 years ago)

Author:

kjdon

Message:

docprint is no longer a docproc, now need to call get_section_xml and print to STDOUT ourselves. Note, I don't know how to test this module

File:

• trunk/gsdl/perllib/incremental_build.pm (modified) (1 diff)

trunk/gsdl/perllib/incremental_build.pm

@@ -167 +167 @@
   if(defined $doc_obj)
   {
-    # Create a new document printer processor
-    my $processor = new docprint();
-    # Finally process it into xml
-    $processor->process($doc_obj);
+      my $doc_text = &docprint::get_section_xml($doc_obj, $doc_obj->get_top_section());
+      print STDOUT $doc_text;
+      # Create a new document printer processor
+      #my $processor = new docprint();
+      # Finally process it into xml
+      #$processor->process($doc_obj);
   }
 }