diff options
| author | Dmitry Antipov | 2014-01-21 06:28:57 +0400 |
|---|---|---|
| committer | Dmitry Antipov | 2014-01-21 06:28:57 +0400 |
| commit | 5004c3bfbb0e3bbaa7d91658eee04d2d4daef663 (patch) | |
| tree | 9a7b3d8971ee53751404a327b2387429bef6967a /src/intervals.c | |
| parent | 87503791212088cdb1d8d5cd916df9d2a8be1999 (diff) | |
| download | emacs-5004c3bfbb0e3bbaa7d91658eee04d2d4daef663.tar.gz emacs-5004c3bfbb0e3bbaa7d91658eee04d2d4daef663.zip | |
* buffer.c (Fkill_buffer): When killing an indirect buffer,
re-attach intervals to its base buffer (Bug#16502).
* intervals.c (set_interval_object): Move from here...
* intervals.h (set_interval_object): ... to here. Fix comments.
Diffstat (limited to 'src/intervals.c')
| -rw-r--r-- | src/intervals.c | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/src/intervals.c b/src/intervals.c index 13ff9a9e3db..703c0cefbd5 100644 --- a/src/intervals.c +++ b/src/intervals.c | |||
| @@ -60,16 +60,7 @@ static INTERVAL reproduce_tree (INTERVAL, INTERVAL); | |||
| 60 | 60 | ||
| 61 | /* Utility functions for intervals. */ | 61 | /* Utility functions for intervals. */ |
| 62 | 62 | ||
| 63 | /* Use these functions to set Lisp_Object | 63 | /* Use these functions to set pointer slots of struct interval. */ |
| 64 | or pointer slots of struct interval. */ | ||
| 65 | |||
| 66 | static void | ||
| 67 | set_interval_object (INTERVAL i, Lisp_Object obj) | ||
| 68 | { | ||
| 69 | eassert (BUFFERP (obj) || STRINGP (obj)); | ||
| 70 | i->up_obj = 1; | ||
| 71 | i->up.obj = obj; | ||
| 72 | } | ||
| 73 | 64 | ||
| 74 | static void | 65 | static void |
| 75 | set_interval_left (INTERVAL i, INTERVAL left) | 66 | set_interval_left (INTERVAL i, INTERVAL left) |