aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
authorHelmut Eller2026-02-13 09:10:16 +0100
committerHelmut Eller2026-02-13 09:10:16 +0100
commit91c9e9883488d715a30877dfd7641ef4b3c62658 (patch)
treee2c4525147e443f86baf9d0144aeadec082d7564 /src/data.c
parent9a4a54af9192a6653164364c75721ee814ffb1e8 (diff)
parentf1fe4d46190263e164ccd1e066095d46a156297f (diff)
downloademacs-feature/igc.tar.gz
emacs-feature/igc.zip
Merge branch 'master' into feature/igcfeature/igc
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: