Skip to content

Commit

Permalink
Remove "unwind-protect" form which does nothing
Browse files Browse the repository at this point in the history
  • Loading branch information
purcell committed Aug 11, 2023
1 parent a3627d2 commit 2d26cb3
Showing 1 changed file with 6 additions and 8 deletions.
14 changes: 6 additions & 8 deletions justl.el
Original file line number Diff line number Diff line change
Expand Up @@ -262,14 +262,12 @@ STRING is the data returned by the PROC"
(when (buffer-live-p (process-buffer proc))
(with-current-buffer (process-buffer proc)
(let ((inhibit-read-only t))
(unwind-protect
(progn
(widen)
(goto-char (marker-position (process-mark proc)))
(insert string)
(comint-carriage-motion (process-mark proc) (point))
(ansi-color-apply-on-region (process-mark proc) (point))
(set-marker (process-mark proc) (point))))))))
(widen)
(goto-char (marker-position (process-mark proc)))
(insert string)
(comint-carriage-motion (process-mark proc) (point))
(ansi-color-apply-on-region (process-mark proc) (point))
(set-marker (process-mark proc) (point))))))

(defun justl-compilation-setup-buffer (buf dir mode &optional no-mode-line)
"Setup the compilation buffer for just-compile-mode.
Expand Down

0 comments on commit 2d26cb3

Please sign in to comment.