(jka-compr-partial-uncompress): Fix previous change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 78d33adce86474132d5e6ba9583b9bdd53326684..01c7104e9961d31c2514d0ba7631c4578c868dfd 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-11-15  Richard M. Stallman  <rms@gnu.org>
+
+       * jka-compr.el (jka-compr-partial-uncompress): Fix previous change.
+
 2001-11-15  Stefan Monnier  <monnier@cs.yale.edu>
 
        * menu-bar.el (menu-bar-edit-menu) <copy>: Put an explicit key binding.
@@ -7,6 +11,16 @@
        * dired.el (dired-undo): Display a message to explain
        that this does not undo file system changes.
 
+2001-11-15  Alan Shutko  <ats@acm.org>
+
+       * compile.el (recompile): Use compilation-arguments if set, so as
+       to be able to M-x recompile the exact command which created a
+       compilation-mode buffer.
+
+2001-11-13  Richard M. Stallman  <rms@gnu.org>
+
+       * progmodes/ada-mode.el (ada-fill-comment-prefix): Doc fix.
+
 2001-11-15  David Kastrup  <David.Kastrup@t-online.de>
 
        * mouse-drag.el (mouse-drag-throw): Push back non-drag events

diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el
index c4a352bc983c4b9fc594ae10c200b014a5f520ac..5c42a0af8be35cc5c7e39d0737009f05167c8a79 100644 (file)
--- a/lisp/jka-compr.el
+++ b/lisp/jka-compr.el
@@ -310,7 +310,7 @@ to keep: LEN chars starting BEG chars from the beginning."
                          ;; dd seems to be unreliable about
                          ;; providing the last block.  So, always
                          ;; read one more than you think you need.
-                         (if count (concat "count=" (1+ count)) "")))
+                         (if count (format "count=%d" (1+ count)) "")))
                        jka-compr-acceptable-retval-list)
                  (jka-compr-error prog args infile message err-file))
            (jka-compr-delete-temp-file err-file)))