setting up PR

This commit is contained in:
Ben Yorke
2023-04-20 10:04:47 +02:00
committed by Gabriel Horner
parent 86d4351e96
commit 96101b9a6d
5 changed files with 236 additions and 35 deletions

View File

@@ -200,8 +200,14 @@
(state/pub-event! [:user/logout]))
(defn upgrade []
(js/window.open
"https://logseqdemo.lemonsqueezy.com/checkout/buy/13e194b5-c927-41a8-af58-ed1a36d6000d"))
(let [base-upgrade-url "https://logseqdemo.lemonsqueezy.com/checkout/buy/13e194b5-c927-41a8-af58-ed1a36d6000d"
user-uuid (user-uuid)
url (cond-> base-upgrade-url
user-uuid (str "?checkout[custom][user_uuid]=" (name user-uuid)))]
(println " ~~~ LEMON: " url " ~~~ ")
(js/window.open url)))
; (js/window.open
; "https://logseqdemo.lemonsqueezy.com/checkout/buy/13e194b5-c927-41a8-af58-ed1a36d6000d"))
(defn <ensure-id&access-token
[]