aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c13
1 files changed, 3 insertions, 10 deletions
diff --git a/src/data.c b/src/data.c
index 4314ca0294e..6d7a882dcfd 100644
--- a/src/data.c
+++ b/src/data.c
@@ -1789,16 +1789,9 @@ set_internal (Lisp_Object symbol, Lisp_Object newval, Lisp_Object where,
1789 set_blv_value (blv, newval); 1789 set_blv_value (blv, newval);
1790 1790
1791 if (blv->fwd) 1791 if (blv->fwd)
1792 { 1792 store_symval_forwarding (blv->fwd, newval, (BUFFERP (where)
1793 if (unbinding_p) 1793 ? XBUFFER (where)
1794 /* If storing void (making the symbol void), forward only through 1794 : current_buffer));
1795 buffer-local indicator, not through Lisp_Objfwd, etc. */
1796 blv->fwd = NULL;
1797 else
1798 store_symval_forwarding (blv->fwd, newval,
1799 BUFFERP (where)
1800 ? XBUFFER (where) : current_buffer);
1801 }
1802 break; 1795 break;
1803 } 1796 }
1804 case SYMBOL_FORWARDED: 1797 case SYMBOL_FORWARDED: