Update ningle-fbr

qlfile.lock

@@ -21,7 +21,7 @@
 ("ningle-fbr" .
  (:class qlot/source/git:source-git
   :initargs (:remote-url "https://github.com/skyizwhite/ningle-fbr.git")
-  :version "git-438030b0b89dc706c37932616e6bf82d0416ea26"))
+  :version "git-e84b170a03c6cee3a4b2b191469e83251ae9e032"))
 ("cl-ppcre" .
  (:class qlot/source/ql:source-ql
   :initargs (:%version :latest)

src/routes/about.lisp

@@ -2,7 +2,7 @@
   (:use #:cl)
   (:local-nicknames (#:pi #:piccolo))
   (:local-nicknames (#:view #:hp/view))
-  (:export #:on-get))
+  (:export #:handle-get))
 (in-package #:hp/routes/about)
 
 (defparameter *metadata*
@@ -16,6 +16,6 @@
       (a :href "/" :hx-boost "true"
         "top"))))
 
-(defun on-get (params)
+(defun handle-get (params)
   (declare (ignore params))
   (view:render (page) :metadata *metadata*))

src/routes/index.lisp

@@ -2,7 +2,7 @@
   (:use #:cl)
   (:local-nicknames (#:pi #:piccolo))
   (:local-nicknames (#:view #:hp/view))
-  (:export #:on-get))
+  (:export #:handle-get))
 (in-package #:hp/routes/index)
 
 (pi:define-element page ()
@@ -12,6 +12,6 @@
       (a :href "/about" :hx-boost "true"
         "About"))))
 
-(defun on-get (params)
+(defun handle-get (params)
   (declare (ignore params))
   (view:render (page)))