Now that comma is an atom delimiter, it's necessary to quote it in

prefixed character constants.

diff --git a/v7/src/edwin/modefs.scm b/v7/src/edwin/modefs.scm
index 391915ea7848598106752f5a6e700c3ec0b94967..d7ce889e515e97e7e3ffb597607239b79c34892b 100644 (file)
--- a/v7/src/edwin/modefs.scm
+++ b/v7/src/edwin/modefs.scm
@@ -1,10 +1,10 @@
 #| -*-Scheme-*-
 
-$Id: modefs.scm,v 1.164 2003/02/25 20:53:22 cph Exp $
+$Id: modefs.scm,v 1.165 2004/01/16 19:07:15 cph Exp $
 
 Copyright 1987,1989,1990,1991,1992,1993 Massachusetts Institute of Technology
 Copyright 1994,1995,1996,1998,1999,2000 Massachusetts Institute of Technology
-Copyright 2003 Massachusetts Institute of Technology
+Copyright 2003,2004 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -132,7 +132,7 @@ Like Fundamental mode, but no self-inserting characters.")
 (define-key 'fundamental #\m-! 'shell-command)
 (define-key 'fundamental #\m-% 'query-replace)
 (define-key 'fundamental #\m-\' 'abbrev-prefix-mark)
-(define-key 'fundamental #\m-, 'tags-loop-continue)
+(define-key 'fundamental #\m-\, 'tags-loop-continue)
 (define-key 'fundamental #\m-- 'auto-argument)
 (define-key 'fundamental #\m-. 'find-tag)
 (define-key 'fundamental #\m-/ 'dabbrev-expand)