po-mode: don't include uncompressed translations when sending

diff --git a/gettext-tools/misc/ChangeLog b/gettext-tools/misc/ChangeLog
index bd4de9adc900c3d1b1b882b54a4e270e65970513..9a894d1cdfa502d8321c0c49397385e18a64ca25 100644 (file)
--- a/gettext-tools/misc/ChangeLog
+++ b/gettext-tools/misc/ChangeLog
@@ -1,3 +1,8 @@
+2013-07-29  Jan Djärv  <jan.h.d@swipnet.se>  (tiny change)
+
+       * po-mode.el (po-send-mail): Don't include original uncompressed
+       text in the mail.
+
 2013-07-21  Daiki Ueno  <ueno@gnu.org>
 
        * autopoint.in (omitintl): Don't set it 'no' when no

diff --git a/gettext-tools/misc/po-mode.el b/gettext-tools/misc/po-mode.el
index 761d8b7e63ddcc368e723edc22bc9f5588817383..cd191b1cc4021bba47090eea79ebc65e7cd3719b 100644 (file)
--- a/gettext-tools/misc/po-mode.el
+++ b/gettext-tools/misc/po-mode.el
@@ -3509,7 +3509,7 @@ Write to your team?  ('n' if writing to the Translation Project robot) ")))
               (insert-buffer-substring buffer)
               (shell-command-on-region
                (region-beginning) (region-end)
-               (concat po-gzip-uuencode-command " " name ".gz") t))))))
+               (concat po-gzip-uuencode-command " " name ".gz") t t))))))
   (message ""))
 
 (defun po-confirm-and-quit ()