[Emacs-diffs] trunk r117920: (sql-product-alist): Improve the Vertica entry.

[Sam Steingold]

------------------------------------------------------------
revno: 117920
revision-id: address@hidden
parent: address@hidden
committer: Sam Steingold <address@hidden>
branch nick: trunk
timestamp: Mon 2014-09-22 15:17:40 -0400
message:
  (sql-product-alist): Improve the Vertica entry.
  
  * lisp/progmodes/sql.el (sql-product-alist): Improve the Vertica entry.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/progmodes/sql.el          sql.el-20091113204419-o5vbwnq5f7feedwu-1303

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2014-09-22 18:22:02 +0000
+++ b/lisp/ChangeLog    2014-09-22 19:17:40 +0000
@@ -1,3 +1,7 @@
+2014-09-22  Sam Steingold  <address@hidden>
+
+       * progmodes/sql.el (sql-product-alist): Improve the Vertica entry.
+
 2014-09-22  Stefan Monnier  <address@hidden>
 
        Add pcase-defmacro, as well as `quote' and `app' patterns.

=== modified file 'lisp/progmodes/sql.el'
--- a/lisp/progmodes/sql.el     2014-09-14 01:28:27 +0000
+++ b/lisp/progmodes/sql.el     2014-09-22 19:17:40 +0000
@@ -511,9 +511,8 @@
      :sqli-program sql-vertica-program
      :sqli-options sql-vertica-options
      :sqli-login sql-vertica-login-params
-     :sqli-comint-func 'sql-comint-vertica
-     :list-all ("select table_name from v_catalog.tables" .
-                "select * from v_catalog.tables")
+     :sqli-comint-func sql-comint-vertica
+     :list-all ("\\d" . "\\dS")
      :list-table "\\d %s"
      :prompt-regexp "^\\w*=[#>] "
      :prompt-length 5