Mercurial > emacs

changeset 42461:c28b5df30ea0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(jka-compr-write-region): If START = nil, use whole buf.
author Richard M. Stallman <rms@gnu.org>
date Tue, 01 Jan 2002 07:23:31 +0000
parents 21eaf0f81c5d
children b72bc440aed5
files lisp/jka-compr.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/jka-compr.el	Tue Jan 01 07:12:59 2002 +0000
+++ b/lisp/jka-compr.el	Tue Jan 01 07:23:31 2002 +0000
@@ -394,6 +394,10 @@
 	 (info (jka-compr-get-compression-info visit-file))
 	 (magic (and info (jka-compr-info-file-magic-bytes info))))
 
+    ;; If START is nil, use the whole buffer.
+    (if (null start)
+	(setq start 1 end (1+ (buffer-size))))
+
     ;; If we uncompressed this file when visiting it,
     ;; then recompress it when writing it
     ;; even if the contents look compressed already.