]> git.eshelyaron.com Git - emacs.git/commitdiff
Ian Eure <ian at digg.com> (tiny change)
authorGlenn Morris <rgm@gnu.org>
Sat, 14 Feb 2009 03:38:00 +0000 (03:38 +0000)
committerGlenn Morris <rgm@gnu.org>
Sat, 14 Feb 2009 03:38:00 +0000 (03:38 +0000)
(sql-product-alist, sql-connect-sqlite): Remove host, user, password
options not applicable to SQlite. (Bug#1904)

lisp/progmodes/sql.el

index 2e5dea59605880d569a9c84fa8d2e967a48766ac..da0794b1f2b0279fc049e5fcf5b03cc69ee061f9 100644 (file)
@@ -356,7 +356,7 @@ highlighted properly when you open them."
      :sqli-prompt-length 0)
     (sqlite
      :font-lock sql-mode-sqlite-font-lock-keywords
-     :sqli-login (user password server database)
+     :sqli-login (database)
      :sqli-connect sql-connect-sqlite
      :sqli-prompt-regexp "^sqlite> "
      :sqli-prompt-length 8)
@@ -2611,12 +2611,6 @@ parameters and command options."
   (let ((params))
     (if (not (string= "" sql-database))
        (setq params (append (list sql-database) params)))
-    (if (not (string= "" sql-server))
-       (setq params (append (list (concat "--host=" sql-server)) params)))
-    (if (not (string= "" sql-password))
-       (setq params (append (list (concat "--password=" sql-password)) params)))
-    (if (not (string= "" sql-user))
-       (setq params (append (list (concat "--user=" sql-user)) params)))
     (if (not (null sql-sqlite-options))
        (setq params (append sql-sqlite-options params)))
     (set-buffer (apply 'make-comint "SQL" sql-sqlite-program