edwintye

package main.resources

//The global script scope
def ctx = context(scope: scriptScope())

//What things can be on the script scope
contributor(ctx) {
    method(name: 'pipeline', type: 'Object', params: [body: Closure])
    property(name: 'params', type: 'org.jenkinsci.plugins.workflow.cps.ParamsVariable')
    property(name: 'env', type: 'org.jenkinsci.plugins.workflow.cps.EnvActionImpl.Binder')

titogarcia

;; https://gist.github.com/titogarcia/4f09bcc5fa38fbdc1076954b9a99a8fc

(ns token-refresh-example
  (:require [clojure.string :refer [ends-with?]]
            [clj-http.client :as http])
  (:import [java.time Instant]
           [java.time.temporal ChronoUnit]))

;;;; Logging implementation for exercising these tests

czan

(ns ^{:doc "Convert Swagger 2 specs to OpenAPI 3 specs

We're using the standard reitit mechanisms to produce a Swagger spec,
but we'd much rather be using an OpenAPI 3 spec. This namespace does a
conversion for us, until the functionality lands in reitit."}
    convert-to-openapi
  (:require [camel-snake-kebab.core :refer [->PascalCase]]
            [clojure.set :refer [rename-keys]]
            [clojure.string :as str]
            [clojure.walk :as walk]

mfikes

The following works in Clojure:

(keys (filter (comp odd? val) {:a 1 :b 2 :c 3}))

The docstrings for keys and vals don't indicate that you can do this. Is this accidential or intentional?

I vaguely recall Alex Miller indicating at some point that this capability was deemed useful and is intentionally allowed. Yes, this is an appeal to authority, but nevertheless, it makes a fairly convincing argument.

baskeboler

(ns clipboard.core
  (:require [fipp.edn :as fipp])
  (:import (java.awt.datatransfer DataFlavor Transferable StringSelection)
           (java.awt Toolkit)
           (java.io StringWriter))
           
(defn get-clipboard
  "get system clipboard"
  []
  (-> (Toolkit/getDefaultToolkit)

holyjak

#!/usr/bin/env bb
#_" -*- mode: clojure; -*-"
;; Based on https://github.com/babashka/babashka/blob/master/examples/image_viewer.clj

(ns http-server
  (:require [babashka.fs :as fs]
            [clojure.java.browse :as browse]
            [clojure.string :as str]
            [clojure.tools.cli :refer [parse-opts]]
            [org.httpkit.server :as server]

realgenekim

I recently had to figure out for a Clojure application how to download all dependency JAR files, for use in a Docker container.

When creating an uberjar, depstar re-downloaded all the external dependencies from Maven central, even though in an earlier Docker build step, I ran clj -Spath to pre-download them (presumably cached into the .m2 directory). In the past, I've used lein deps to do something similiar.

I'm grateful for Sean Corfield helping out (again!!): In short, use clj -P (short for "prepare") to download dependencies. Note the "A:depstar" option, which ensures that the depstar dependencies are downloaded, too.

Here's what it looks like in a Dockerfile:

# to pre-download dependencies, only done if deps.edn changes

stelcodes

; run `bb backup` to backup database
; run `bb restore` to restore latest backup

{:min-bb-version "0.4.0",
 :tasks {; CONSTANTS
         db-name "dev_blog",
         backup-dir "backups",
         now (str (java.time.LocalDateTime/now)),
         ; TASKS
         create-backup-dir {:depends [backup-dir], :task (babashka.fs/create-dirs backup-dir)},

bhauman

(ns ^:figwheel-hooks tilelayout.core
  (:require
   [goog.dom :as gdom]
   [goog.crypt.base64 :as base64]
   [goog.events :as gevent]
   [clojure.string :as string]
   [cljs.reader :refer [read-string]])
  (:import [goog History]))

;; TILE LAYOUT GENERATION

cgrand

;; let's say you want to perform an action only when a state is true and returns true/false depending on the action success
;; typically I would write

(if @open ; check state
  (do
    (.put q bytes) ; action
    true)
  false)
  
;; or