From a829e5fff281acc8f681bfdb8eaa04e971c398e8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andr=C3=A9=20A=2E=20Gomes?= Date: Fri, 9 Sep 2022 18:45:34 +0300 Subject: [PATCH] Uniformize return-actions nil binding. --- source/history.lisp | 2 +- source/mode.lisp | 4 ++-- source/mode/auto.lisp | 4 ++-- source/mode/search-buffer.lisp | 2 +- 4 files changed, 6 insertions(+), 6 deletions(-) diff --git a/source/history.lisp b/source/history.lisp index bda4c6848033..43c0d74d492b 100644 --- a/source/history.lisp +++ b/source/history.lisp @@ -122,7 +122,7 @@ then become available for deletion with `delete-history-entry'." (let ((buffers (or (alex:ensure-list buffer) (prompt :prompt "Reset histories of buffer(s)" :sources (make-instance 'buffer-source - :return-actions '()))))) + :return-actions nil))))) (files:with-file-content (history (history-file (current-buffer))) (dolist (buffer buffers) (htree:reset-owner history (id buffer)))))) diff --git a/source/mode.lisp b/source/mode.lisp index d61f2816f455..7e7edd2c70c7 100644 --- a/source/mode.lisp +++ b/source/mode.lisp @@ -335,7 +335,7 @@ If it's a single buffer, return it directly (not as a list)." :prompt "Enable mode(s) for buffer(s)" :sources (make-instance 'buffer-source :multi-selection-p t - :return-actions '()))))) + :return-actions nil))))) (modes (if modes (uiop:ensure-list modes) (unless explicit-modes-p @@ -371,7 +371,7 @@ If it's a single buffer, return it directly (not as a list)." :prompt "Enable mode(s) for buffer(s)" :sources (make-instance 'buffer-source :multi-selection-p t - :return-actions '()))))) + :return-actions nil))))) (modes (if modes (uiop:ensure-list modes) (unless explicit-modes-p diff --git a/source/mode/auto.lisp b/source/mode/auto.lisp index ed29816ce5d6..19b8edcb3a39 100644 --- a/source/mode/auto.lisp +++ b/source/mode/auto.lisp @@ -330,7 +330,7 @@ For the storage format see the comment in the head of your `auto-mode-rules-file (make-instance 'prompter:raw-source :name "New URL") (make-instance 'global-history-source - :return-actions '()))))) + :return-actions nil))))) (when (typep url 'nyxt::history-entry) (setf url (url url))) (add-modes-to-auto-mode-rules @@ -360,7 +360,7 @@ For the storage format see the comment in the head of your `auto-mode-rules-file (make-instance 'prompter:raw-source :name "New URL") (make-instance 'global-history-source - :return-actions '()))))) + :return-actions nil))))) (when (typep url 'nyxt::history-entry) (setf url (url url))) (add-modes-to-auto-mode-rules (url-infer-match url) diff --git a/source/mode/search-buffer.lisp b/source/mode/search-buffer.lisp index 836881fe057b..91e9f2a821c1 100644 --- a/source/mode/search-buffer.lisp +++ b/source/mode/search-buffer.lisp @@ -258,7 +258,7 @@ Example: "Search multiple buffers." (let ((buffers (prompt :prompt "Search buffer(s)" :sources (make-instance 'buffer-source ; TODO: Define class? - :return-actions '() + :return-actions nil :multi-selection-p t)))) (prompt :prompt "Search text"