[Emacs-diffs] Changes to emacs/lisp/jka-compr.el [lexbind]

[Miles Bader]

Index: emacs/lisp/jka-compr.el
diff -c emacs/lisp/jka-compr.el:1.70.2.1 emacs/lisp/jka-compr.el:1.70.2.2
*** emacs/lisp/jka-compr.el:1.70.2.1    Fri Apr  4 01:20:08 2003
--- emacs/lisp/jka-compr.el     Tue Oct 14 19:51:10 2003
***************
*** 573,582 ****
                                                  uncompress-args)))
                      (setq size (- (point) start))
                      (if replace
!                         (let* ((del-beg (point))
!                                (del-end (+ del-beg size)))
!                           (delete-region del-beg
!                                          (min del-end (point-max)))))
                      (goto-char start))
                  (error
                   (if (and (eq (car error-code) 'file-error)
--- 573,579 ----
                                                  uncompress-args)))
                      (setq size (- (point) start))
                      (if replace
!                         (delete-region (point) (point-max)))
                      (goto-char start))
                  (error
                   (if (and (eq (car error-code) 'file-error)
***************
*** 943,946 ****
--- 940,944 ----
  
  (provide 'jka-compr)
  
+ ;;; arch-tag: 3f15b630-e9a7-46c4-a22a-94afdde86ebc
  ;;; jka-compr.el ends here