mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-02-01 20:06:00 +00:00
(Finsert_buffer_substring): Check for deleted buffer.
(Fcompare_buffer_substrings): Likewise.
This commit is contained in:
parent
1747fb168a
commit
93b62e8278
@ -1364,6 +1364,8 @@ They default to the beginning and the end of BUFFER.")
|
||||
if (NILP (buffer))
|
||||
nsberror (buf);
|
||||
bp = XBUFFER (buffer);
|
||||
if (NILP (bp->name))
|
||||
error ("Selecting deleted buffer");
|
||||
|
||||
if (NILP (start))
|
||||
b = BUF_BEGV (bp);
|
||||
@ -1424,6 +1426,8 @@ determines whether case is significant or ignored.")
|
||||
if (NILP (buf1))
|
||||
nsberror (buffer1);
|
||||
bp1 = XBUFFER (buf1);
|
||||
if (NILP (bp1->name))
|
||||
error ("Selecting deleted buffer");
|
||||
}
|
||||
|
||||
if (NILP (start1))
|
||||
@ -1460,6 +1464,8 @@ determines whether case is significant or ignored.")
|
||||
if (NILP (buf2))
|
||||
nsberror (buffer2);
|
||||
bp2 = XBUFFER (buf2);
|
||||
if (NILP (bp2->name))
|
||||
error ("Selecting deleted buffer");
|
||||
}
|
||||
|
||||
if (NILP (start2))
|
||||
|
Loading…
Reference in New Issue
Block a user