[Emacs-diffs] master 1f2c4f8 4/8: emacs-lisp/package-x.el: Create valid tar files

[Artur Malabarba]

branch: master
commit 1f2c4f817ee37c7c7767e22eda1c427456885b6b
Author: Kelly Dean <address@hidden>
Commit: Artur Malabarba <address@hidden>

    emacs-lisp/package-x.el: Create valid tar files
    
    * emacs-lisp/package-x.el (package-upload-buffer-internal):
    Create valid tar files. (Bug#19536)
---
 lisp/ChangeLog               |    5 +++++
 lisp/emacs-lisp/package-x.el |    2 +-
 2 files changed, 6 insertions(+), 1 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b3da9dc..d5080d9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,10 @@
 2015-02-16  Kelly Dean  <address@hidden>
 
+       * emacs-lisp/package-x.el (package-upload-buffer-internal):
+       Create valid tar files. (Bug#19536)
+
+2015-02-16  Kelly Dean  <address@hidden>
+
        * desktop.el (desktop-read): Conditionally re-enable desktop autosave.
        (Bug#19059)
 
diff --git a/lisp/emacs-lisp/package-x.el b/lisp/emacs-lisp/package-x.el
index e0945d4..6955ce8 100644
--- a/lisp/emacs-lisp/package-x.el
+++ b/lisp/emacs-lisp/package-x.el
@@ -247,7 +247,7 @@ if it exists."
                             (concat (symbol-name pkg-name) "-readme.txt")
                             package-archive-upload-base)))
 
-           (set-buffer pkg-buffer)
+           (set-buffer (if (eq file-type 'tar) tar-data-buffer pkg-buffer))
            (write-region (point-min) (point-max)
                          (expand-file-name
                           (format "%s-%s.%s" pkg-name pkg-version extension)