From 2464ffed16da9bebfc84ae3d1e60b89e2ec81dc1 Mon Sep 17 00:00:00 2001 From: "Andre A. Gomes" Date: Fri, 15 Dec 2023 23:01:42 +0200 Subject: [PATCH] buffer(toggle-prompt-buffer-focus): Minor refactor. --- source/buffer.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/source/buffer.lisp b/source/buffer.lisp index 63c7ea8e123..f952d190b51 100644 --- a/source/buffer.lisp +++ b/source/buffer.lisp @@ -1483,10 +1483,10 @@ is listed first." "Toggle the focus between the current buffer and the current prompt buffer." (let ((prompt-buffer (current-prompt-buffer))) (if (prompt-buffer-p (focused-buffer)) - (progn (set-current-buffer (current-buffer)) + (prog1 (set-current-buffer (current-buffer)) (ps-eval :buffer prompt-buffer (setf (ps:@ (nyxt/ps:qs document "*") style opacity) "0.5"))) - (progn (ffi-focus-prompt-buffer (current-window) prompt-buffer) + (prog1 (ffi-focus-prompt-buffer (current-window) prompt-buffer) (ps-eval :buffer prompt-buffer (setf (ps:@ (nyxt/ps:qs document "*") style opacity) "1"))))))