From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 17 Apr 2018 21:26:11 +0000 (+0200)
Subject: Revert hunk mistakenly applied in last patch
X-Git-Tag: emacs-27.0.90~5148
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d2d1f39536e32dc6789ee2d26aeda05a405d47d3;p=emacs.git

Revert hunk mistakenly applied in last patch
---

diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el
index ebbef8d89ee..f907a01d8cf 100644
--- a/lisp/progmodes/sql.el
+++ b/lisp/progmodes/sql.el
@@ -4031,16 +4031,15 @@ Writes the input history to a history file using
 
 This function is a sentinel watching the SQL interpreter process.
 Sentinels will always get the two parameters PROCESS and EVENT."
-  (when (buffer-live-p (process-buffer process))
-    (with-current-buffer (process-buffer process)
-      (let
-          ((comint-input-ring-separator sql-input-ring-separator)
-           (comint-input-ring-file-name sql-input-ring-file-name))
-        (comint-write-input-ring))
-
-      (if (not buffer-read-only)
-          (insert (format "\nProcess %s %s\n" process event))
-        (message "Process %s %s" process event)))))
+  (with-current-buffer (process-buffer process)
+    (let
+        ((comint-input-ring-separator sql-input-ring-separator)
+         (comint-input-ring-file-name sql-input-ring-file-name))
+      (comint-write-input-ring))
+
+    (if (not buffer-read-only)
+        (insert (format "\nProcess %s %s\n" process event))
+      (message "Process %s %s" process event))))