From 6b05c39dec3612b41f642f5ef96fb59e1055bc10 Mon Sep 17 00:00:00 2001 From: colin Date: Fri, 26 May 2023 09:56:59 -0700 Subject: trackpad friendly fire --- fussy.lisp | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) (limited to 'fussy.lisp') diff --git a/fussy.lisp b/fussy.lisp index 3d06fcf..942c5d3 100644 --- a/fussy.lisp +++ b/fussy.lisp @@ -710,11 +710,7 @@ h1, h2, h3, h4 { "The page endpoint for a theme package" (let ((themes (themes-in-package pkg)) - (page(:div :classa "search" - (:form :method "GET" :action "/" - (:label :for "terms") - (:input :name "terms" :value (format nil "~{~a ~}" terms)) - (:button :type "submit" "search"))) + (page (or page 0))) (html:with-html-string (:doctype) -- cgit v1.2.3