diff options
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index 91469230b7e..515eca1ceca 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -1850,7 +1850,7 @@ readevalloop (Lisp_Object readcharfun, | |||
| 1850 | /* Set point and ZV around stuff to be read. */ | 1850 | /* Set point and ZV around stuff to be read. */ |
| 1851 | Fgoto_char (start); | 1851 | Fgoto_char (start); |
| 1852 | if (!NILP (end)) | 1852 | if (!NILP (end)) |
| 1853 | Fnarrow_to_region (make_number (BEGV), end); | 1853 | Fnarrow_to_region (make_number (BEGV), end, Qnil); |
| 1854 | 1854 | ||
| 1855 | /* Just for cleanliness, convert END to a marker | 1855 | /* Just for cleanliness, convert END to a marker |
| 1856 | if it is an integer. */ | 1856 | if it is an integer. */ |