diff options
| author | Dave Love <fx@gnu.org> | 2003-10-20 19:07:02 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2003-10-20 19:07:02 +0000 |
| commit | 6c119ac0b46d8233c4582111f9c391044d207a87 (patch) | |
| tree | 40d67e90f30088d41d06cb32bbb90ddcb66c2fe3 /lisp/emacs-lisp/easy-mmode.el | |
| parent | 748fb1aabd8cb3fd65128560bbf6085efaa59a0e (diff) | |
| download | emacs-6c119ac0b46d8233c4582111f9c391044d207a87.tar.gz emacs-6c119ac0b46d8233c4582111f9c391044d207a87.tar.bz2 emacs-6c119ac0b46d8233c4582111f9c391044d207a87.zip | |
(easy-mmode-define-navigation): Avoid
incf in macro expansion.
Diffstat (limited to 'lisp/emacs-lisp/easy-mmode.el')
| -rw-r--r-- | lisp/emacs-lisp/easy-mmode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index 9d73a8cdac8..cdc4bc3aca0 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -1,6 +1,6 @@ ;;; easy-mmode.el --- easy definition for major and minor modes -;; Copyright (C) 1997, 2000, 2001, 2003 Free Software Foundation, Inc. +;; Copyright (C) 1997, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. ;; Author: Georges Brun-Cottan <Georges.Brun-Cottan@inria.fr> ;; Maintainer: Stefan Monnier <monnier@gnu.org> @@ -440,7 +440,7 @@ ENDFUN should return the end position (with or without moving point)." (interactive) (unless count (setq count 1)) (if (< count 0) (,prev-sym (- count)) - (if (looking-at ,re) (incf count)) + (if (looking-at ,re) (setq count (1+ count))) (if (not (re-search-forward ,re nil t count)) (if (looking-at ,re) (goto-char (or ,(if endfun `(,endfun)) (point-max))) |