Export "stop" function.

docs/changelog.lisp

@@ -9,6 +9,8 @@
                               "ASDF"
                               "REPL"
                               "HTTP"))
+  (0.3.1 2024-10-29
+         "* `stop` function was exported.")
   (0.3.0 2024-05-27
          "* Field `url` was added to `content` objects of type `post` and `page`. It contains a full URL of the page and can be used as `canonical` URL in templates.")
   (0.2.0 2024-05-26

docs/making-a-static-site.lisp

@@ -154,8 +154,14 @@ CL-USER> (staticl:serve :root-dir #P"/tmp/my-site"
   Starting Clack server to serve site from /tmp/result/
 Hunchentoot server is started.
 Listening on localhost:8001.
+#S(CLACK.HANDLER::HANDLER
+   :SERVER :HUNCHENTOOT
+   :SWANK-PORT NIL
+   :ACCEPTOR #<BT2:THREAD "clack-handler-hunchentoot" {100480FF43}>)
 ```
 
+It will return a web server handler.
+
 Or from the command line:
 
 ```bash
@@ -182,6 +188,13 @@ If you click on one of the posts, it will open in its entirety:
 
 Pay attention to the "Next" link in the lower right corner. All blog posts are linked to each other and this is also done thanks to a separate pipeline block: `(prev-next-links)'. This pipeline block adds metadata to each post, which is then available in the template. If you remove it, the links will disappear from the pages.
 
+To stop your server, use the following command in REPL:
+
+```lisp
+CL-USER> (staticl:stop)
+; No values
+```
+
 ## How to add comments using Disqus
 
 

src/core.lisp

@@ -6,10 +6,12 @@
   (:import-from #:staticl/builder
                 #:generate)
   (:import-from #:staticl/server
-                #:serve)
+                #:serve
+                #:stop)
   (:export #:generate
            #:new-site
-           #:serve))
+           #:serve
+           #:stop))
 (in-package #:staticl)
 
 

src/server.lisp

@@ -28,7 +28,8 @@
   (:import-from #:staticl/plugins/autoreload
                 #:autoreload)
   (:export
-   #:serve))
+   #:serve
+   #:stop))
 (in-package #:staticl/server)
 
 (defvar *port* nil)