From 229e1af869d5a1c71c9f745b83e90ae4b176ef85 Mon Sep 17 00:00:00 2001 From: Marcus Kammer Date: Sat, 26 Aug 2023 08:42:08 +0200 Subject: [PATCH] Fix naming --- examples/album.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/examples/album.lisp b/examples/album.lisp index ec1c96b..4e75e7c 100644 --- a/examples/album.lisp +++ b/examples/album.lisp @@ -35,7 +35,7 @@ (:import-from :cl-sbt/btn :btn-primary) (:import-from :cl-sbt/navbar :navbar :brand :toggler :collapsible) (:import-from :cl-sbt/utility :color) - (:import-from :cl-sbt :write-string-to-file :with-page) + (:import-from :cl-sbt :write-html-to-file :with-page) (:import-from :spinneret :with-html-string) (:export :contact @@ -233,7 +233,7 @@ to the respective component macros." (let ((spinneret:*html-lang* lang) (spinneret:*html-style* style) (spinneret:*fill-column* fc)) - (write-string-to-file filepath + (write-html-to-file filepath (with-html-string (page "Album" t))))) ;(cl-sbt/album:write-page "~/quicklisp/local-projects/cl-sbt/public/examples/album.html")