scratch/undo-apply d86df4449b9 1/2: Less generic error message

Helmut Eller <[email protected]>
Newsgroups gmane.emacs.diffs
Message-ID <[email protected]>
branch: scratch/undo-apply
commit d86df4449b9c72d4f57aa383d062c30402496f34
Author: Helmut Eller <[email protected]>
Commit: Helmut Eller <[email protected]>

    Less generic error message
    
    * lisp/subr.el (undo--wrap-and-run-primitive-undo): Use "Unexpected
    change of region length" instead of "Not yet implemented".
---
 lisp/subr.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/subr.el b/lisp/subr.el
index 04ca6a042e9..7de553b802c 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -5759,7 +5759,7 @@ the function `undo--wrap-and-run-primitive-undo'."
   "Call `primitive-undo' on the undo elements in LIST.
 
 This function is intended to be called purely by `undo' as the
-function in an \(apply DELTA BEG END FUNNAME . ARGS) undo
+function in an \(apply DELTA (BEG . END) FUNNAME . ARGS) undo
 element.  It invokes `before-change-functions' and
 `after-change-functions' once each for the entire region \(BEG
 END) rather than once for each individual change.
@@ -5773,7 +5773,7 @@ Undo elements of this form are generated by the macro
   (let* ((beg-delta (- orig-beg beg))
          (end-delta (- orig-end end))
          (list (cond ((/= beg-delta end-delta)
-                      (error "Not yet implemented"))
+                      (error "Unexpected change of region length"))
                      ((= beg-delta 0)
                       list)
                      (t
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.