[Bps-public-commit] keynote-to-text branch, master, updated. 63f7e30ce0ec75cc99371d811de3360e49547e85

[Alex Vandiver]

The branch, master has been updated
       via  63f7e30ce0ec75cc99371d811de3360e49547e85 (commit)
      from  d2b0bedff8a9a476938be280f9b9cc4b7154b9f0 (commit)

Summary of changes:
 keynote-to-text |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

- Log -----------------------------------------------------------------
commit 63f7e30ce0ec75cc99371d811de3360e49547e85
Author: Alex Vandiver <alexmv at bestpractical.com>
Date:   Tue Feb 28 18:12:44 2012 -0500

    Allow inline newlines

diff --git a/keynote-to-text b/keynote-to-text
index ef6929d..ece3cfe 100644
--- a/keynote-to-text
+++ b/keynote-to-text
@@ -42,6 +42,7 @@ sub print_body {
         if ($e->tag eq "sf:p") {
             next unless $e->text =~ /\S/;
             my $subindent = " "x ($e->att("sf:list-level") || 0);
+            $_->set_text("\n$indent$subindent  ") for $e->descendants("sf:lnbr");
             print $indent . $subindent . "* ".$e->text."\n";
         }
     }

-----------------------------------------------------------------------