diff options
| -rw-r--r-- | etc/NEWS | 11 | ||||
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/progmodes/sql.el | 11 |
3 files changed, 23 insertions, 2 deletions
@@ -146,6 +146,15 @@ protocols as well as for "telnet" and "ftp" are passed to Tramp. *** New connection method "nc", which allows to access dumb busyboxes. +** SQL mode + +*** New user variable `sql-default-directory' enables remote +connections using Tramp. + +*** New command `sql-send-line-and-next' sends the current line to the +interactive buffer and advances to the next line, skipping whitespace +and comments. + ** VC and related modes *** New option `vc-annotate-background-mode' controls whether @@ -209,7 +218,7 @@ position list returned for such events is now nil. * Lisp Changes in Emacs 24.5 *** call-process-shell-command and process-file-shell-command -don't take "&rest args" an more. +don't take "&rest args" any more. ** New function `funcall-interactively', which works like `funcall' but makes `called-interactively-p' treat the function as (you guessed it) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 28f0ef0c520..d12138f3ead 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -4,6 +4,9 @@ bound to C-c C-n. (sql-show-sqli-buffer): Display the buffer instead of its name and bind the command to C-c C-z. + (sql-default-directory): New user option. + (sql-product-interactive): Bind `default-directory' to it to + enable remote connections using Tramp. 2014-09-08 Glenn Morris <rgm@gnu.org> diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el index c63339d98c8..486e6b651d2 100644 --- a/lisp/progmodes/sql.el +++ b/lisp/progmodes/sql.el @@ -282,6 +282,13 @@ file. Since that is a plaintext file, this could be dangerous." :group 'SQL :safe 'numberp) +(defcustom sql-default-directory nil + "Default directory for SQL processes." + :version "24.5" + :type 'string + :group 'SQL + :safe 'stringp) + ;; Login parameter type (define-widget 'sql-login-params 'lazy @@ -4173,7 +4180,9 @@ the call to \\[sql-product-interactive] with (sql-password (default-value 'sql-password)) (sql-server (default-value 'sql-server)) (sql-database (default-value 'sql-database)) - (sql-port (default-value 'sql-port))) + (sql-port (default-value 'sql-port)) + (default-directory (or sql-default-directory + default-directory))) (funcall (sql-get-product-feature product :sqli-comint-func) product (sql-get-product-feature product :sqli-options))) |