# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1066676751 0
# Node ID a2ef3d8f83d4d560f6b2b69e385d7d81bb365c84
# Parent  9417a94488d3c76eb60c4e9d058bda7ca2feff8b
(easy-mmode-define-navigation):  Avoid
incf in macro expansion.

diff -r 9417a94488d3 -r a2ef3d8f83d4 lisp/emacs-lisp/easy-mmode.el
--- a/lisp/emacs-lisp/easy-mmode.el	Mon Oct 20 17:16:16 2003 +0000
+++ b/lisp/emacs-lisp/easy-mmode.el	Mon Oct 20 19:05:51 2003 +0000
@@ -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 @@
 	 (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)))