feature/improved-locked-narrowing 890d6c15a7: ; * src/editfns.c (Fnarrow_to_region): Two forgotten cases.

[Gregory Heytings]

branch: feature/improved-locked-narrowing
commit 890d6c15a752b6b12dc639a43277466852aa8470
Author: Gregory Heytings <gregory@heytings.org>
Commit: Gregory Heytings <gregory@heytings.org>

    ; * src/editfns.c (Fnarrow_to_region): Two forgotten cases.
---
 src/editfns.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/editfns.c b/src/editfns.c
index c672783292..58ebe5540f 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -2751,6 +2751,8 @@ limit of the locked restriction is used instead of the 
argument.  */)
       ptrdiff_t begv = XFIXNUM (Fcar (Fcdr (Fcar (Vnarrowing_locks))));
       ptrdiff_t zv = XFIXNUM (Fcdr (Fcdr (Fcar (Vnarrowing_locks))));
       if (s < begv) s = begv;
+      if (s > zv) s = zv;
+      if (e < begv) e = begv;
       if (e > zv) e = zv;
     }