HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
3ddff13
)
(sql-escape-newlines-and-send)
author
Richard M. Stallman
<rms@gnu.org>
Thu, 17 Jan 2002 01:39:49 +0000
(
01:39
+0000)
committer
Richard M. Stallman
<rms@gnu.org>
Thu, 17 Jan 2002 01:39:49 +0000
(
01:39
+0000)
(sql-query-placeholders-and-send): Fix previous change.
lisp/progmodes/sql.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/progmodes/sql.el
b/lisp/progmodes/sql.el
index
9905766
..
fb33db0
100644
(file)
--- a/
lisp/progmodes/sql.el
+++ b/
lisp/progmodes/sql.el
@@
-1029,7
+1029,7
@@
This function is used for `comint-input-sender' if using `sql-oracle' on NT."
t t string)))
(comint-send-string proc string)
(if comint-input-sender-no-newline
- (if (not (string-equal
input
""))
+ (if (not (string-equal
string
""))
(process-send-eof))
(comint-send-string proc "\n")))
@@
-1050,7
+1050,7
@@
Every newline in STRING will be preceded with a space and a backslash."
(setq result (concat result (substring string start)))
(comint-send-string proc result)
(if comint-input-sender-no-newline
- (if (not (string-equal
input
""))
+ (if (not (string-equal
string
""))
(process-send-eof))
(comint-send-string proc "\n"))))