[Emacs-diffs] Changes to emacs/lisp/sort.el

[Stefan Monnier]

Index: emacs/lisp/sort.el
diff -c emacs/lisp/sort.el:1.40 emacs/lisp/sort.el:1.41
*** emacs/lisp/sort.el:1.40     Sun Dec 23 01:44:39 2001
--- emacs/lisp/sort.el  Thu Apr 11 23:42:56 2002
***************
*** 186,194 ****
              sort-lists (cdr sort-lists)
              old (cdr old)))
        (goto-char (point-max))
!       (insert-buffer-substring old-buffer
!                              last
!                              max)
  
        ;; Copy the reordered text from the temporary buffer
        ;; to the buffer we sorted (OLD-BUFFER).
--- 186,192 ----
              sort-lists (cdr sort-lists)
              old (cdr old)))
        (goto-char (point-max))
!       (insert-buffer-substring old-buffer last max)
  
        ;; Copy the reordered text from the temporary buffer
        ;; to the buffer we sorted (OLD-BUFFER).
***************
*** 203,209 ****
        (delete-region min max)
        ;; Now replace the separator " " with the sorted text.
        (goto-char (point-max))
!       (insert-buffer-substring temp-buffer 1 (1+ (- max min)))
        (delete-region min (1+ min))))))
  
  ;;;###autoload
--- 201,207 ----
        (delete-region min max)
        ;; Now replace the separator " " with the sorted text.
        (goto-char (point-max))
!       (insert-buffer-substring temp-buffer)
        (delete-region min (1+ min))))))
  
  ;;;###autoload