diff options
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/lread.c b/src/lread.c index 46fe6cd3e51..77750eea4fa 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -2375,7 +2375,7 @@ read1 (readcharfun, pch, first_in_list) | |||
| 2375 | c = 0; | 2375 | c = 0; |
| 2376 | else if (c == (CHAR_CTL | '?')) | 2376 | else if (c == (CHAR_CTL | '?')) |
| 2377 | c = 127; | 2377 | c = 127; |
| 2378 | 2378 | ||
| 2379 | if (c & CHAR_SHIFT) | 2379 | if (c & CHAR_SHIFT) |
| 2380 | { | 2380 | { |
| 2381 | /* Shift modifier is valid only with [A-Za-z]. */ | 2381 | /* Shift modifier is valid only with [A-Za-z]. */ |
| @@ -2460,9 +2460,9 @@ read1 (readcharfun, pch, first_in_list) | |||
| 2460 | 2460 | ||
| 2461 | if (next_char <= 040 | 2461 | if (next_char <= 040 |
| 2462 | || (next_char < 0200 | 2462 | || (next_char < 0200 |
| 2463 | && index ("\"';([#?", next_char) | 2463 | && (index ("\"';([#?", next_char) |
| 2464 | || (!first_in_list && next_char == '`') | 2464 | || (!first_in_list && next_char == '`') |
| 2465 | || (new_backquote_flag && next_char == ','))) | 2465 | || (new_backquote_flag && next_char == ',')))) |
| 2466 | { | 2466 | { |
| 2467 | *pch = c; | 2467 | *pch = c; |
| 2468 | return Qnil; | 2468 | return Qnil; |
| @@ -3682,7 +3682,7 @@ init_lread () | |||
| 3682 | /* When Emacs is invoked over network shares on NT, PATH_LOADSEARCH is | 3682 | /* When Emacs is invoked over network shares on NT, PATH_LOADSEARCH is |
| 3683 | almost never correct, thereby causing a warning to be printed out that | 3683 | almost never correct, thereby causing a warning to be printed out that |
| 3684 | confuses users. Since PATH_LOADSEARCH is always overridden by the | 3684 | confuses users. Since PATH_LOADSEARCH is always overridden by the |
| 3685 | EMACSLOADPATH environment variable below, disable the warning on NT. | 3685 | EMACSLOADPATH environment variable below, disable the warning on NT. |
| 3686 | Also, when using the "self-contained" option for Carbon Emacs for MacOSX, | 3686 | Also, when using the "self-contained" option for Carbon Emacs for MacOSX, |
| 3687 | the "standard" paths may not exist and would be overridden by | 3687 | the "standard" paths may not exist and would be overridden by |
| 3688 | EMACSLOADPATH as on NT. Since this depends on how the executable | 3688 | EMACSLOADPATH as on NT. Since this depends on how the executable |