master 07bb8dc0afa: Bind cross-buffer buffer-local variable correctly.

[Alan Mackenzie]

branch: master
commit 07bb8dc0afaef5ec7a7e194df42cc019ce8604d4
Author: Alan Mackenzie <acm@muc.de>
Commit: Alan Mackenzie <acm@muc.de>

    Bind cross-buffer buffer-local variable correctly.
    
    This fixes bug#68200.
    
    * lisp/emacs-lisp/bytecomp.el (byte-compile-output-docform):
    Note that let-binding a buffer local variable leaves it buffer
    local, hence to transfer the binding of
    byte-compile-dynamic-docstrings to the output buffer, an
    intermediate variable is needed.  Implement this.
---
 lisp/emacs-lisp/bytecomp.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 2bc8d54ba77..ea9298c6646 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -2605,9 +2605,10 @@ list that represents a doc string reference.
 `defvaralias', `autoload' and `custom-declare-variable' need that."
   ;; We need to examine byte-compile-dynamic-docstrings
   ;; in the input buffer (now current), not in the output buffer.
-  (let ((byte-compile-dynamic-docstrings byte-compile-dynamic-docstrings))
+  (let ((dynamic-docstrings byte-compile-dynamic-docstrings))
     (with-current-buffer byte-compile--outbuffer
-      (let ((position (point))
+      (let ((byte-compile-dynamic-docstrings dynamic-docstrings)
+            (position (point))
             (print-continuous-numbering t)
             print-number-table
             ;; FIXME: The bindings below are only needed for when we're