From 4d71df6d7ecab0244bf817c425b07c2236867960 Mon Sep 17 00:00:00 2001
From: Alexander Rosenberg <zanderpkg@pm.me>
Date: Tue, 3 Sep 2024 18:24:08 -0700
Subject: [PATCH] Fix type in help output

---
 truth-table.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/truth-table.lisp b/truth-table.lisp
index 82c45f5..496b75f 100644
--- a/truth-table.lisp
+++ b/truth-table.lisp
@@ -875,7 +875,7 @@ arguments will be placed in a list at the beginning of the alist."
 
 (defun print-usage (stream spec)
   "Print the command line usage corresponding to SPEC to STREAM."
-  (format stream "usage: truth-table [options] <proposition>~%~%")
+  (format stream "usage: truth-table [options] <propositions...>~%~%")
   (loop with longest-option
           = (apply 'max (mapcar
                          (lambda (entry)