Intern defnk

README.adoc

@@ -63,18 +63,20 @@ A new project is created for a function defined as `my-bb-function`. It will con
 In `bb` language:
 [source, clojure]
 ----
-(defn handler [{:keys [headers body context] :as event}]
+(defn handler [{:keys [headers body context]} :as event]
+  ...)
+; or
+(defnk handler [body headers context]
   ...)
 ----
-`event` is a map containing `:headers`, `:body` and `:context` keys.
 
-`:headers` contains headers, as such:
+`headers` contains headers, as such:
 [source, clojure]
 ----
 {:content-type "application/json"}
 ----
 
-`:body` is the payload body. When passing a JSON object payload and using `bb` language, the payload will be automatically parsed as a Clojure map with keyword keys. There are cases where it's preferable to have string keys in the payload body, and it's possible to support them by setting `keywords: false` in the Function in `stack.yml`:
+`body` is the payload body. When passing a JSON object payload and using `bb` language, the payload will be automatically parsed as a Clojure map with keyword keys. There are cases where it's preferable to have string keys in the payload body, and it's possible to support them by setting `keywords: false` in the Function in `stack.yml`:
 [source, yml]
 ----
 my-function:

SECURITY.md

@@ -2,10 +2,12 @@
 
 ## Supported Versions
 
-The latest version in the most recent commit of the `main` branch.
+The most recent commit of the `main` branch.
 
 ## Reporting a vulnerability
-Please send an email to [email protected]. We take all reports seriously and will investigate each issue reported to us.
+Please send an email to [email protected].
+
+We take all reports seriously and will investigate each issue reported to us.
 
 ## What to expect after reporting a vulnerability 
 

examples/bb-hiccup/handler.clj

@@ -1,5 +1,5 @@
 (ns handler
   (:require view))
 
-(defn handler [{:keys [body]}]
+(defnk handler [body]
   (view/render-page "My Page" body))

examples/bb-map-context/handler.clj

@@ -1,4 +1,4 @@
 (ns handler)
 
-(defn handler [{:keys [body headers context]}]
+(defnk handler [body headers context]
   [(keys body) (vals body) (:content-type headers) (:upstream-url context)])

examples/bb-map/handler.clj

@@ -1,4 +1,4 @@
 (ns handler)
 
-(defn handler [{:keys [body]}]
+(defnk handler [body]
   [(keys body) (vals body)])

examples/bb-routes/handler.clj

@@ -1,6 +1,6 @@
 (ns handler)
 
-(defn handler [{:keys [request-method uri]}]
+(defnk handler [request-method uri]
   (case [request-method uri]
     [:get "/"] "root"
     [:get "/foo"] "foo"))

template/bb/Dockerfile

@@ -17,6 +17,8 @@ RUN addgroup --system app && adduser --system --ingroup app app
 USER app
 WORKDIR $HOME
 
+RUN bb prepare -Sdeps 'prismatic/plumbing {:mvn/version "0.6.0"}'
+
 COPY --chown=app:app index.clj bb.edn lib merge_config.clj ./
 
 COPY --chown=app:app function/bb.edn* function/bb.edn

template/bb/index.clj

@@ -11,8 +11,11 @@
     [ring.util.walk :as ring-walk]
     [secrets :refer [->secrets]]
     [compojure.response :as response]
+    [plumbing.core :refer [defnk]]
     [handler :as function]))
 
+(intern 'clojure.core 'defnk #'defnk)
+
 (def keywords? #(if (nil? %) true %))
 
 (def fn-arg-cnt #(some-> % meta :arglists first count))