Fix bug in M-x electric-c-terminator: it was not correctly handling
authorChris Hanson <org/chris-hanson/cph>
Thu, 2 Feb 1995 21:22:52 +0000 (21:22 +0000)
committerChris Hanson <org/chris-hanson/cph>
Thu, 2 Feb 1995 21:22:52 +0000 (21:22 +0000)
goto tags that contained _ or $.

v7/src/edwin/c-mode.scm

index 3e981a6385dca3297aff8a739cd8d3f95df96473..7ce2696064712d4dcd5ed5e4de848c7c0fdd76fa 100644 (file)
@@ -1,8 +1,8 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Id: c-mode.scm,v 1.52 1993/08/10 05:46:42 cph Exp $
+;;;    $Id: c-mode.scm,v 1.53 1995/02/02 21:22:52 cph Exp $
 ;;;
-;;;    Copyright (c) 1986, 1989-93 Massachusetts Institute of Technology
+;;;    Copyright (c) 1986, 1989-95 Massachusetts Institute of Technology
 ;;;
 ;;;    This material was developed by the Scheme project at the
 ;;;    Massachusetts Institute of Technology, Department of
@@ -234,7 +234,7 @@ regardless of where in the line point is when the TAB command is used."
                                                      false))
                               (mark< (skip-chars-forward
                                       " \t"
-                                      (forward-word mark 1))
+                                      (skip-chars-forward "a-zA-Z0-9_$" mark))
                                      point))
                          (let ((state
                                 (parse-partial-sexp