diff options
| -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 | ||