Mercurial > emacs
changeset 108991:b2a9d4e48488
* lisp/progmodes/sql.el (sql-connect-mysql): Fix typo.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Mon, 14 Jun 2010 20:34:12 -0700 |
| parents | 8f3a9d4ebe87 |
| children | 0c1f025545a1 51e15604baa1 |
| files | lisp/ChangeLog lisp/progmodes/sql.el |
| diffstat | 2 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Jun 14 19:03:04 2010 +0300 +++ b/lisp/ChangeLog Mon Jun 14 20:34:12 2010 -0700 @@ -1,3 +1,7 @@ +2010-06-15 Bob Rogers <rogers-emacs@rgrjr.dyndns.org> (tiny change) + + * progmodes/sql.el (sql-connect-mysql): Fix typo. + 2010-06-14 Juri Linkov <juri@jurta.org> Add sort option `list-colors-sort'. (Bug#6332)
--- a/lisp/progmodes/sql.el Mon Jun 14 19:03:04 2010 +0300 +++ b/lisp/progmodes/sql.el Mon Jun 14 20:34:12 2010 -0700 @@ -3119,7 +3119,7 @@ (setq params (append (list sql-database) params))) (if (not (string= "" sql-server)) (setq params (append (list (concat "--host=" sql-server)) params))) - (if (not (and sql-port (numberp sql-port))) + (if (and sql-port (numberp sql-port)) (setq params (append (list (concat "--port=" (number-to-string sql-port))) params))) (if (not (string= "" sql-password)) (setq params (append (list (concat "--password=" sql-password)) params)))