• Home
• org.cloudhoist
• pallet-common
• 0.3.1
• source code
• string.clj

×

Project download

Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $

You can buy this project and download/modify it how often you want.

pallet.common.string.clj Maven / Gradle / Ivy

(ns pallet.common.string
  "String utilities

   Follows design notes from clojure.string"
  (:require
    [clojure.string :as string]))

(defn ^String substring
  "The one index version drops first n characters from s.  Returns an empty
   string if n is greater than the length of s.

   The two index version returns a substring between the two indices.

       (substring \"test\" 1) => \"est\"
       (substring \"test\" 1 3) => \"es\""
  ([^CharSequence s n]
     (if (< (count s) n)
       ""
       (.substring s n)))
  ([^CharSequence s n m]
     (if (< (count s) n)
       ""
       (.substring s n (min m (count s))))))

(defn ^String quoted
  "Add quotes to the argument s as a string"
  [s]
  (str "\"" s "\""))

(defn ^String underscore
  "Replace all occurances of - with _"
  [^CharSequence s]
  (string/replace s \- \_))