[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master d2d1f39: Revert hunk mistakenly applied in last pat
From: |
Lars Ingebrigtsen |
Subject: |
[Emacs-diffs] master d2d1f39: Revert hunk mistakenly applied in last patch |
Date: |
Tue, 17 Apr 2018 17:26:25 -0400 (EDT) |
branch: master
commit d2d1f39536e32dc6789ee2d26aeda05a405d47d3
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>
Revert hunk mistakenly applied in last patch
---
lisp/progmodes/sql.el | 19 +++++++++----------
1 file changed, 9 insertions(+), 10 deletions(-)
diff --git a/lisp/progmodes/sql.el b/lisp/progmodes/sql.el
index ebbef8d..f907a01 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))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master d2d1f39: Revert hunk mistakenly applied in last patch,
Lars Ingebrigtsen <=