Commits

Anonymous committed bc6a7d4

Refactored the PDF and RTF outputs.

  • Participants
  • Parent commits 0e626be

Comments (0)

Files changed (1)

File modules/App-XML-DocBook-Docmake/lib/App/XML/DocBook/Docmake.pm

     );
 }
 
-sub _run_mode_pdf
+sub _run_xslt_and_from_fo
 {
     my $self = shift;
+    my $args = shift;
 
     my $xslt_output_path = $self->_output_path();
 
     return $self->_exec_command(
         [
             "fop",
-            "-pdf", $self->_output_path(),
+            ("-".$args->{fo_out_format}), $self->_output_path(),
             $xslt_output_path,
         ],
     );
 }
 
+sub _run_mode_pdf
+{
+    my $self = shift;
+
+    return $self->_run_xslt_and_from_fo(
+        {
+            fo_out_format => "pdf",
+        },
+    );
+}
+
 sub _run_mode_rtf
 {
     my $self = shift;
 
-    my $xslt_output_path = $self->_output_path();
-
-    $xslt_output_path =~ s{\.([^\.]*)\z}{\.fo}ms;
-
-    $self->_run_xslt({output_path => $xslt_output_path});
-
-    return $self->_exec_command(
-        [
-            "fop",
-            "-rtf", $self->_output_path(),
-            $xslt_output_path,
-        ],
+    return $self->_run_xslt_and_from_fo(
+        {
+            fo_out_format => "rtf",
+        },
     );
 }