From 47f3ab1848b3e90c31eec60b8767192af920f91d Mon Sep 17 00:00:00 2001
From: Jambunathan K <kjambunathan@gmail.com>
Date: Mon, 21 Mar 2011 20:21:22 +0530
Subject: [PATCH] org-odt.el: Fix emitting of horizontal lines.

* org-odt.el (org-odt-end-export): Delete only those empty
paragraphs that have default style-name. This ensures that a
Horizontal Lines are not deleted.
---
 lisp/org-odt.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/org-odt.el b/lisp/org-odt.el
index 445a3c21c..360841386 100644
--- a/lisp/org-odt.el
+++ b/lisp/org-odt.el
@@ -37,7 +37,9 @@
 (defun org-odt-end-export ()
   ;; remove empty paragraphs
   (goto-char (point-min))
-  (while (re-search-forward "<text:p[^>]*>[ \r\n\t]*</text:p>" nil t)
+  (while (re-search-forward
+	  "<text:p\\( text:style-name=\"Text_20_body\"\\)?>[ \r\n\t]*</text:p>"
+	  nil t)
     (replace-match ""))
   (goto-char (point-min))
 
-- 
2.11.4.GIT