From f520c6f276b88304e9dcfce6f77a15053873c9bd Mon Sep 17 00:00:00 2001 From: Martin Rudalics Date: Sat, 29 Sep 2007 08:00:32 +0000 Subject: [PATCH] (allout-before-change-handler): Replace got-char by goto-char. --- lisp/ChangeLog | 5 +++++ lisp/allout.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b8ff1f4827c..3b281434770 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2007-09-29 Martin Rudalics + + * allout.el (allout-before-change-handler): Replace got-char by + goto-char. + 2007-09-28 Stefan Monnier * vc-svn.el (vc-svn-resolve-when-done, vc-svn-find-file-hook): New funs. diff --git a/lisp/allout.el b/lisp/allout.el index d243a188812..1f748fb0026 100644 --- a/lisp/allout.el +++ b/lisp/allout.el @@ -2191,7 +2191,7 @@ See allout-overlay-interior-modification-handler for details." (when (and (featurep 'xemacs) (allout-mode-p)) ;; process all of the pending overlays: (save-excursion - (got-char beg) + (goto-char beg) (let ((overlay (allout-get-invisibility-overlay))) (allout-overlay-interior-modification-handler overlay nil beg end nil))))) -- 2.39.2