changeset 58093:a65f6f256839

(read1): Fix next_char matching.
author Kim F. Storm <storm@cua.dk>
date Tue, 09 Nov 2004 13:24:19 +0000
parents 066860841caf
children 1f8360dd535b
files src/lread.c
diffstat 1 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/src/lread.c	Tue Nov 09 13:24:07 2004 +0000
+++ b/src/lread.c	Tue Nov 09 13:24:19 2004 +0000
@@ -2374,7 +2374,7 @@
 	      c = 0;
 	    else if (c == (CHAR_CTL | '?'))
 	      c = 127;
-	    
+
 	    if (c & CHAR_SHIFT)
 	      {
 		/* Shift modifier is valid only with [A-Za-z].  */
@@ -2459,9 +2459,9 @@
 
 	if (next_char <= 040
 	    || (next_char < 0200
-		&& index ("\"';([#?", next_char)
-		|| (!first_in_list && next_char == '`')
-		|| (new_backquote_flag && next_char == ',')))
+		&& (index ("\"';([#?", next_char)
+		    || (!first_in_list && next_char == '`')
+		    || (new_backquote_flag && next_char == ','))))
 	  {
 	    *pch = c;
 	    return Qnil;
@@ -3681,7 +3681,7 @@
   /* When Emacs is invoked over network shares on NT, PATH_LOADSEARCH is
      almost never correct, thereby causing a warning to be printed out that
      confuses users.  Since PATH_LOADSEARCH is always overridden by the
-     EMACSLOADPATH environment variable below, disable the warning on NT.  
+     EMACSLOADPATH environment variable below, disable the warning on NT.
      Also, when using the "self-contained" option for Carbon Emacs for MacOSX,
      the "standard" paths may not exist and would be overridden by
      EMACSLOADPATH as on NT.  Since this depends on how the executable