Rename: alambda to thunk*

1 files changed, 2 insertions, 2 deletions

diff --git a/user.lisp b/user.lisp
index a18ecb3..6fbbf66 100644
--- a/user.lisp
+++ b/user.lisp
@@ -22,7 +22,7 @@
            (button (:content "Create" :bind btn)))
     (set-on-click
      btn
-     (alambda
+     (thunk*
        (new-playlist (session-user parent) :title (value pl-title))
        (reload (location (connection-body parent)))))))
 
@@ -43,7 +43,7 @@
                         (a (:link url :content (playlist-title pl) :bind pl-link))))
         (set-on-click
          pl-link
-         (alambda
+         (thunk*
            (setf (url (location (connection-body parent)))
                  url)))))))