branch: externals/caml
commit b499b25d3c75eacdd28b4f9fc989b2c2daa2b2c0
Author: Xavier Leroy <[email protected]>
Commit: Xavier Leroy <[email protected]>

    MPR#7610: caml.el: avoid using deprecated last-command-char variable
    
    Also: mention (in Changes) this and other recent caml.el tweaks.
---
 caml.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/caml.el b/caml.el
index 06720ad..fb3670a 100644
--- a/caml.el
+++ b/caml.el
@@ -1768,7 +1768,7 @@ by |, insert one."
 (defun caml-abbrev-hook ()
   "If inserting a leading keyword at beginning of line, reindent the line."
   ;itz unfortunately we need a special case
-  (if (and (not (caml-in-comment-p)) (not (= last-command-char ?_)))
+  (if (and (not (caml-in-comment-p)) (not (= last-command-event ?_)))
       (let* ((bol (save-excursion (beginning-of-line) (point)))
              (kw (save-excursion
                    (and (re-search-backward "^[ \t]*\\(\\sw+\\)\\=" bol t)
@@ -1778,7 +1778,7 @@ by |, insert one."
                             (goto-char (match-beginning 1))
                             (caml-indent-command)
                             (current-column)))
-                  (abbrev-correct (if (= last-command-char ?\ ) 1 0)))
+                  (abbrev-correct (if (= last-command-event ?\ ) 1 0)))
               (indent-to (- indent
                             (or
                              (symbol-value

Reply via email to