aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKarl Heuer1994-11-15 00:06:33 +0000
committerKarl Heuer1994-11-15 00:06:33 +0000
commit6746ed7a3362b1ef0283cd0d922058cb86cbb5a0 (patch)
tree085f875348fd745a1d4f1513a652f5ac0aacb650 /src
parent9dbfa8cfbbbd857bf388582b5d5c66f9f9d0331d (diff)
downloademacs-6746ed7a3362b1ef0283cd0d922058cb86cbb5a0.tar.gz
emacs-6746ed7a3362b1ef0283cd0d922058cb86cbb5a0.zip
(Fkill_all_local_variables): Use XBUFFER_LOCAL_VALUE, not XCONS.
Diffstat (limited to 'src')
-rw-r--r--src/buffer.c11
1 files changed, 6 insertions, 5 deletions
diff --git a/src/buffer.c b/src/buffer.c
index 1b4a885f5e5..98885cc535a 100644
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -1273,25 +1273,26 @@ the normal hook `change-major-mode-hook'.")
1273 sym = XCONS (XCONS (alist)->car)->car; 1273 sym = XCONS (XCONS (alist)->car)->car;
1274 1274
1275 /* Need not do anything if some other buffer's binding is now encached. */ 1275 /* Need not do anything if some other buffer's binding is now encached. */
1276 tem = XCONS (XCONS (XSYMBOL (sym)->value)->cdr)->car; 1276 tem = XCONS (XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->cdr)->car;
1277 if (XBUFFER (tem) == current_buffer) 1277 if (XBUFFER (tem) == current_buffer)
1278 { 1278 {
1279 /* Symbol is set up for this buffer's old local value. 1279 /* Symbol is set up for this buffer's old local value.
1280 Set it up for the current buffer with the default value. */ 1280 Set it up for the current buffer with the default value. */
1281 1281
1282 tem = XCONS (XCONS (XSYMBOL (sym)->value)->cdr)->cdr; 1282 tem = XCONS (XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->cdr)->cdr;
1283 /* Store the symbol's current value into the alist entry 1283 /* Store the symbol's current value into the alist entry
1284 it is currently set up for. This is so that, if the 1284 it is currently set up for. This is so that, if the
1285 local is marked permanent, and we make it local again below, 1285 local is marked permanent, and we make it local again below,
1286 we don't lose the value. */ 1286 we don't lose the value. */
1287 XCONS (XCONS (tem)->car)->cdr 1287 XCONS (XCONS (tem)->car)->cdr
1288 = do_symval_forwarding (XCONS (XSYMBOL (sym)->value)->car); 1288 = do_symval_forwarding (XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->car);
1289 /* Switch to the symbol's default-value alist entry. */ 1289 /* Switch to the symbol's default-value alist entry. */
1290 XCONS (tem)->car = tem; 1290 XCONS (tem)->car = tem;
1291 /* Mark it as current for the current buffer. */ 1291 /* Mark it as current for the current buffer. */
1292 XCONS (XCONS (XSYMBOL (sym)->value)->cdr)->car = Fcurrent_buffer (); 1292 XCONS (XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->cdr)->car
1293 = Fcurrent_buffer ();
1293 /* Store the current value into any forwarding in the symbol. */ 1294 /* Store the current value into any forwarding in the symbol. */
1294 store_symval_forwarding (sym, XCONS (XSYMBOL (sym)->value)->car, 1295 store_symval_forwarding (sym, XBUFFER_LOCAL_VALUE (XSYMBOL (sym)->value)->car,
1295 XCONS (tem)->cdr); 1296 XCONS (tem)->cdr);
1296 } 1297 }
1297 } 1298 }