diff options
| author | Filipp Gunbin | 2018-07-11 05:28:21 +0300 |
|---|---|---|
| committer | Filipp Gunbin | 2018-07-11 05:30:10 +0300 |
| commit | 1d7151e98e9da5eeb4e341cfdb7d1f4462dc5b70 (patch) | |
| tree | 089138bdd12d3ab9672400cf00a9532be216d7a3 /lisp/progmodes | |
| parent | 39489f782e436a490d1bec32d7ed9b7bcdacda24 (diff) | |
| download | emacs-1d7151e98e9da5eeb4e341cfdb7d1f4462dc5b70.tar.gz emacs-1d7151e98e9da5eeb4e341cfdb7d1f4462dc5b70.zip | |
Fix Bug#32107
* lisp/progmodes/sql.el (sql-buffer-live-p): Fix handling of optional
connection argument. (Bug#32107)
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/sql.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el index 223fb2ec936..ba180c2b26c 100644 --- a/lisp/progmodes/sql.el +++ b/lisp/progmodes/sql.el | |||
| @@ -1270,8 +1270,9 @@ specified, it's `sql-product' or `sql-connection' must match." | |||
| 1270 | (and (derived-mode-p 'sql-interactive-mode) | 1270 | (and (derived-mode-p 'sql-interactive-mode) |
| 1271 | (or (not product) | 1271 | (or (not product) |
| 1272 | (eq product sql-product)) | 1272 | (eq product sql-product)) |
| 1273 | (or (stringp connection) | 1273 | (or (not connection) |
| 1274 | (string= connection sql-connection))))))) | 1274 | (and (stringp connection) |
| 1275 | (string= connection sql-connection)))))))) | ||
| 1275 | 1276 | ||
| 1276 | ;; Keymap for sql-interactive-mode. | 1277 | ;; Keymap for sql-interactive-mode. |
| 1277 | 1278 | ||