From dc7b4525e5d0251a6da13b28354b245906adf42b Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 23 Feb 2007 06:03:41 +0000 Subject: [PATCH] (Fgarbage_collect): If nextb->text->inhibit_shrinking is nonzero, don't shrink the buffer nextb. --- src/alloc.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/alloc.c b/src/alloc.c index c8a5a38e592..f847b4052b7 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -5043,7 +5043,8 @@ returns nil, because real GC can't be done. */) truncate_undo_list (nextb); /* Shrink buffer gaps, but skip indirect and dead buffers. */ - if (nextb->base_buffer == 0 && !NILP (nextb->name)) + if (nextb->base_buffer == 0 && !NILP (nextb->name) + && ! nextb->text->inhibit_shrinking) { /* If a buffer's gap size is more than 10% of the buffer size, or larger than 2000 bytes, then shrink it -- 2.39.5