From 65b3c24a2bc8b28adfa02aa1c836b79bc514d5ed Mon Sep 17 00:00:00 2001
From: "Matthew L. Fidler" <matthew.fidler@gmail.com>
Date: Sat, 11 Aug 2012 00:44:48 -0500
Subject: [PATCH] Bug fix for syncing readme.  Now the returns should not be as
 prevalent.

---
 Readme.org    | 16 +++++-----------
 org-readme.el | 13 +++++++++----
 2 files changed, 14 insertions(+), 15 deletions(-)

diff --git a/Readme.org b/Readme.org
index 168ec58..8dc8c62 100644
--- a/Readme.org
+++ b/Readme.org
@@ -1,13 +1,6 @@
 #+TITLE: Org Readme
 #+AUTHOR: Matthew L. Fidler
 
-
-
-
-
-
-
-
 * Library Information
  *org-readme.el* --- Integrates Readme.org and Commentary/Change-logs.
 
@@ -16,11 +9,11 @@
  - Author :: Matthew L. Fidler
  - Maintainer :: Matthew L. Fidler
  - Created :: Fri Aug  3 22:33:41 2012 (-0500)
- - Version :: 0.04
+ - Version :: 0.05
  - Package-Requires :: ((http-post-simple "1.0") (yaoddmuse "0.1.1"))
- - Last-Updated :: Sat Aug 11 00:39:25 2012 (-0500)
+ - Last-Updated :: Sat Aug 11 00:44:20 2012 (-0500)
  -           By :: Matthew L. Fidler
- -     Update # :: 431
+ -     Update # :: 435
  - URL :: https://github.com/mlf176f2/org-readme
  - Keywords :: Header2, Readme.org, Emacswiki, Git
  - Compatibility :: Tested with Emacs 24.1 on Windows.
@@ -70,12 +63,13 @@ This library assumes that the Emacs Lisp libraries are created using
 
 * History
 
+ - 11-Aug-2012 ::  Bug fix for syncing readme. Now the returns should not be as prevalent. (Matthew L. Fidler)
  - 11-Aug-2012 ::  Attempting to post to marmlade again... (Matthew L. Fidler)
  - 11-Aug-2012 ::  Attempting to fix org-readme-marmalade-post. (Matthew L. Fidler)
  - 11-Aug-2012 ::  Bug fix to upload to emacswiki and upload to marmalade-repo (Matthew L. Fidler)
  - 11-Aug-2012 ::  Added marmalade-repo support. Now org-readme should upload to marmalade-repo when the version is different from the latest version.  (Matthew L. Fidler)
  - 08-Aug-2012 ::  Fixed preformatting tags in emacswiki post. Previously they may have been replaced with <PRE></pre> instead of <pre></pre>. This makes the emacswiki page display correctly. (Matthew L. Fidler)
- - 07-Aug-2012 ::  To use, put (require 'ess-smart-underscore) in your ~/.emacs file 7-Aug-2012 Matthew L. Fidler Last-Updated: Sat Aug 11 00:39:36 2012 (-0500)
+ - 07-Aug-2012 ::  To use, put (require 'ess-smart-underscore) in your ~/.emacs file 7-Aug-2012 Matthew L. Fidler Last-Updated: Sat Aug 11 00:44:34 2012 (-0500)
  - 06-Aug-2012 ::  Added support for uploading Readme.org files to emacswiki without having to have a single associated lisp file. (Matthew L. Fidler)
  - 06-Aug-2012 ::  Bug fix for syncing from the single lisp file. (Matthew L. Fidler)
  - 06-Aug-2012 ::  Added the ability to call =org-readme-sync= from Readme.org (Matthew L. Fidler)
diff --git a/org-readme.el b/org-readme.el
index dd18266..f0a008a 100644
--- a/org-readme.el
+++ b/org-readme.el
@@ -5,11 +5,11 @@
 ;; Author: Matthew L. Fidler
 ;; Maintainer: Matthew L. Fidler
 ;; Created: Fri Aug  3 22:33:41 2012 (-0500)
-;; Version: 0.04
+;; Version: 0.05
 ;; Package-Requires: ((http-post-simple "1.0") (yaoddmuse "0.1.1"))
-;; Last-Updated: Sat Aug 11 00:39:42 2012 (-0500)
+;; Last-Updated: Sat Aug 11 00:44:40 2012 (-0500)
 ;;           By: Matthew L. Fidler
-;;     Update #: 432
+;;     Update #: 436
 ;; URL: https://github.com/mlf176f2/org-readme
 ;; Keywords: Header2, Readme.org, Emacswiki, Git
 ;; Compatibility: Tested with Emacs 24.1 on Windows.
@@ -65,6 +65,9 @@
 ;; 
 ;;; Change Log:
 ;; 11-Aug-2012    Matthew L. Fidler  
+;;    Last-Updated: Sat Aug 11 00:44:17 2012 (-0500) #434 (Matthew L. Fidler)
+;;    Bug fix for syncing readme.  Now the returns should not be as prevalent.
+;; 11-Aug-2012    Matthew L. Fidler  
 ;;    Last-Updated: Sat Aug 11 00:39:23 2012 (-0500) #430 (Matthew L. Fidler)
 ;;    Attempting to post to marmlade again...
 ;; 11-Aug-2012    Matthew L. Fidler  
@@ -641,7 +644,9 @@ When AT-BEGINNING is non-nil, if the section is not found, insert it at the begi
           (progn
             (setq mtch (match-string 1))
             (delete-region
-             (match-beginning 0)
+             (save-excursion
+               (goto-char (match-beginning 0))
+               (skip-chars-backward " \t\n"))
              (if (re-search-forward (format "^%s +" (regexp-quote mtch)) nil t)
                  (progn
                    (- (match-beginning 0) 1))