Mercurial > emacs
comparison src/alloc.c @ 59314:9c620c1aa7fa
(Fgarbage_collect): Don't truncate_undo_list on dead buffers.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 02 Jan 2005 22:52:23 +0000 |
| parents | 4295cf593352 |
| children | 1678d14c4109 |
comparison
equal
deleted
inserted
replaced
| 59313:ad91f130fbdf | 59314:9c620c1aa7fa |
|---|---|
| 4681 { | 4681 { |
| 4682 /* If a buffer's undo list is Qt, that means that undo is | 4682 /* If a buffer's undo list is Qt, that means that undo is |
| 4683 turned off in that buffer. Calling truncate_undo_list on | 4683 turned off in that buffer. Calling truncate_undo_list on |
| 4684 Qt tends to return NULL, which effectively turns undo back on. | 4684 Qt tends to return NULL, which effectively turns undo back on. |
| 4685 So don't call truncate_undo_list if undo_list is Qt. */ | 4685 So don't call truncate_undo_list if undo_list is Qt. */ |
| 4686 if (! EQ (nextb->undo_list, Qt)) | 4686 if (! NILP (nextb->name) && ! EQ (nextb->undo_list, Qt)) |
| 4687 truncate_undo_list (nextb); | 4687 truncate_undo_list (nextb); |
| 4688 | 4688 |
| 4689 /* Shrink buffer gaps, but skip indirect and dead buffers. */ | 4689 /* Shrink buffer gaps, but skip indirect and dead buffers. */ |
| 4690 if (nextb->base_buffer == 0 && !NILP (nextb->name)) | 4690 if (nextb->base_buffer == 0 && !NILP (nextb->name)) |
| 4691 { | 4691 { |