procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(jka-compr-write-region): Typo.

Browse source
This commit is contained in:
Stefan Monnier 2008-05-28 17:37:04 +00:00
parent ba2b460a1b
commit 5e84e8f9ac
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/jka-compr.el
View file

@ -273,9 +273,9 @@ There should be no more than seven characters after the final `/'."
(equal (if (stringp start)
(substring start 0 (min (length start)
(length magic)))
(let ((from (or start (point-min)))
(to (min (or end (point-max))
(+ from (length magic)))))
(let* ((from (or start (point-min)))
(to (min (or end (point-max))
(+ from (length magic)))))
(buffer-substring from to)))
magic))))
(let ((can-append (jka-compr-info-can-append info))