[Emacs-diffs] Changes to emacs/lisp/progmodes/sql.el

[Richard M. Stallman]

Index: emacs/lisp/progmodes/sql.el
diff -c emacs/lisp/progmodes/sql.el:1.30 emacs/lisp/progmodes/sql.el:1.31
*** emacs/lisp/progmodes/sql.el:1.30    Sun Dec 30 17:12:02 2001
--- emacs/lisp/progmodes/sql.el Sat Jan 12 23:44:22 2002
***************
*** 1028,1034 ****
                   nil nil nil sql-placeholder-history)
                  t t string)))
    (comint-send-string proc string)
!   (comint-send-string proc "\n"))
  
  ;; Using DB2 interactively, newlines must be escaped with " \".
  ;; The space before the backslash is relevant.
--- 1028,1037 ----
                   nil nil nil sql-placeholder-history)
                  t t string)))
    (comint-send-string proc string)
!   (if comint-input-sender-no-newline
!       (if (not (string-equal input ""))
!         (process-send-eof))
!     (comint-send-string proc "\n")))
  
  ;; Using DB2 interactively, newlines must be escaped with " \".
  ;; The space before the backslash is relevant.
***************
*** 1046,1052 ****
        (setq start me))
      (setq result (concat result (substring string start)))
      (comint-send-string proc result)
!     (comint-send-string proc "\n")))
  
  
  
--- 1049,1058 ----
        (setq start me))
      (setq result (concat result (substring string start)))
      (comint-send-string proc result)
!     (if comint-input-sender-no-newline
!       (if (not (string-equal input ""))
!           (process-send-eof))
!       (comint-send-string proc "\n"))))