reedho

{:paths ["src" "resources"]
 :deps  {org.clojure/clojure   {:mvn/version "1.12.0-alpha5"}
         missionary/missionary {:mvn/version "b.33"}
         datalevin/datalevin   {:mvn/version "0.8.21"}
         }
 :aliases
 {:run-m {:main-opts ["-m" "playground.playground"]}

  :run-x {:ns-default playground.playground
          :exec-fn    greet

reedho

Note

• Perhatikan posisi element .copyright menentukan apakah akan diulang untuk setiap page, atau misal setelah halaman tertentu saja, karena content nya aktif/tersedia pada saat dia sudah terbaca. Jika dia posisi nya di paling atas body content, maka ia akan diulang untuk setiap page, jika berada paling bawah, maka akan muncul di halaman terakhir saja.

• Referensi lengkap nya di https://www.w3.org/TR/css-gcpm-3/#running-elements.

reedho

Cloudflare Wrangler

Tips setup wrangler project, berguna jika kita mau integrasi ke project yang sudah ada.

• Install wrangler globally dengan npm install --location global wrangler.

• Lalu create directory untuk project nya, misal: mkdir /tmp/x1 && cd /tmp/x1.

• Init project dengan pnpm: pnpm init.

reedho

Contentful.com

(require 'org.httpkit.client)
(do
  (def _base_url "https://cdn.contentful.com")
  (def _env "master")
  (def _space_id "xyz")
  (def _token "xyz")
  )

reedho

import assert from 'assert'

import * as Ma from 'fp-ts/Magma'
import * as Fu from 'fp-ts/Functor'
import * as Ap from 'fp-ts/Applicative'

import * as FN from 'fp-ts/function'

import * as B from 'fp-ts/boolean'
import * as S from 'fp-ts/string'

reedho

#{\† \  \á \Â \â \™ \¤ \¥ \ˆ \€ \Î \‰ \° \± \² \– \³ \´ \µ \× \‘ \’ \º \“ \”}

reedho

;; https://github.com/leonoel/missionary/tree/master/doc/tutorials

(ns my.web.app
  (:require [missionary.core :as m]))


;; Basic how the `task` used in practice

(def slow-mo-hello-task
  (m/sp (println "hello")

reedho

;; https://reactrouter.com/web/example/auth-workflow
;; ported to cljs with rumext 
;; 28-Sep-2021
;; Ridho

(ns my.web.app
  (:require ["react" :as react :refer [createContext useContext]]
            ["react-dom" :as react-dom]
            [rumext.alpha :as mf]
            [applied-science.js-interop :as j]

reedho

; -*- mode: emacs-lisp; lexical-binding: t -*-
;; This file is loaded by Spacemacs at startup.
;; It must be stored in your home directory.

(defun dotspacemacs/layers ()
  "Layer configuration:
This function should only modify configuration layer settings."
  (setq-default
   ;; Base distribution to use. This is a layer contained in the directory
   ;; `+distribution'. For now available distributions are `spacemacs-base'

reedho

(require '[clojure.data.xml :as xml])

;; `emit-str`
(xml/emit-str
 (xml/sexp-as-element
  [:Login
   [:AgencyCode "agencycode"]
   [:Username "XML_Agency"]
   [:Password "Password@123"]]))