[elpa] externals/flymake-proselint a51edc1061 3/3: Fix previous commit

[ELPA Syncer]

branch: externals/flymake-proselint
commit a51edc10611d2d7706f4c5c20d377f84a5a60bb8
Author: Manuel Uberti <manuel.uberti@inventati.org>
Commit: Manuel Uberti <manuel.uberti@inventati.org>

    Fix previous commit
---
 flymake-proselint.el | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/flymake-proselint.el b/flymake-proselint.el
index 860f58628a..95c36d5fde 100644
--- a/flymake-proselint.el
+++ b/flymake-proselint.el
@@ -287,14 +287,13 @@ Flymake diagnostic objects."
   "Sentinel on PROC for handling Proselint response.
 A successfully parsed message is passed onto the function
 `flymake-proselint-sentinel-1' for further handling."
-  (let ((buffer (process-get proc 'source)))
-    (when (buffer-live-p buffer)
+  (let ((source (process-get proc 'source)))
+    (when (buffer-live-p source)
       (pcase (process-status proc)
         ('exit
-         (let ((report-fn (process-get proc 'report-fn))
-               (source (process-get proc 'source)))
+         (let ((report-fn (process-get proc 'report-fn)))
            (unwind-protect
-               (with-current-buffer buffer
+               (with-current-buffer (process-buffer proc)
                  (goto-char (point-min))
                  (cond
                   ((with-current-buffer source
@@ -315,8 +314,8 @@ A successfully parsed message is passed onto the function
                       (flymake-log :error "Invalid response: %S" err))))))
              (with-current-buffer source
                (setq flymake-proselint--flymake-proc nil))
-             (kill-buffer buffer))))
-        ('signal (kill-buffer buffer))))))
+             (kill-buffer (process-buffer proc)))))
+        ('signal (kill-buffer (process-buffer proc)))))))
 
 (defun flymake-proselint-backend (report-fn &rest _args)
   "Flymake backend for Proselint.