Uniformize return-actions nil binding.

atlas-engineer · Sep 12, 2022 · ef7ed5a · ef7ed5a
1 parent 4b62adc
commit ef7ed5a
Show file tree

Hide file tree

Showing 4 changed files with 6 additions and 6 deletions.
diff --git 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
@@ -338,7 +338,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
@@ -374,7 +374,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
@@ -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
@@ -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"