From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 24 Apr 2022 11:39:36 +0000 (+0200)
Subject: Ensure that the global sql-buffer variable is set
X-Git-Tag: emacs-29.0.90~1931^2~334
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e632c7bd80c728af76873e1358e6f2bfb4ff7c54;p=emacs.git

Ensure that the global sql-buffer variable is set

* lisp/progmodes/sql.el (sql-product-interactive): Set the
expected global value of sql-buffer (bug#55088).
---

diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el
index 18b0274fbfd..5e5f5e13fe6 100644
--- a/lisp/progmodes/sql.el
+++ b/lisp/progmodes/sql.el
@@ -4644,6 +4644,9 @@ the call to \\[sql-product-interactive] with
                   (setq sql-buffer (buffer-name new-sqli-buffer))
                   (run-hooks 'sql-set-sqli-hook)))
 
+              ;; Also set the global value.
+              (setq-default sql-buffer (buffer-name new-sqli-buffer))
+
               ;; Make sure the connection is complete
               ;; (Sometimes start up can be slow)
               ;;  and call the login hook