From acad0ce6258cbecbf141f1b01d7b0da272912db4 Mon Sep 17 00:00:00 2001
From: Chris Oakman <chris@oakmac.com>
Date: Mon, 20 Feb 2023 17:01:30 -0600
Subject: [PATCH] GitHub Issue #48 - add clojure.string/starts-with?,
 clojure.string/ends-with? (#52)

---
 cljs-server/cljs_cheatsheet_server/core.cljs     |  7 ++++---
 docfiles/cljs.core_emptyQMARK.cljsdoc            |  1 +
 docfiles/clojure.string_blankQMARK.cljsdoc       |  1 +
 docfiles/clojure.string_ends-withQMARK.cljsdoc   | 13 +++++++++++++
 docfiles/clojure.string_includesQMARK.cljsdoc    |  2 ++
 docfiles/clojure.string_starts-withQMARK.cljsdoc | 13 +++++++++++++
 6 files changed, 34 insertions(+), 3 deletions(-)
 create mode 100644 docfiles/clojure.string_ends-withQMARK.cljsdoc
 create mode 100644 docfiles/clojure.string_starts-withQMARK.cljsdoc

diff --git a/cljs-server/cljs_cheatsheet_server/core.cljs b/cljs-server/cljs_cheatsheet_server/core.cljs
index 2c9ff04..8e92287 100644
--- a/cljs-server/cljs_cheatsheet_server/core.cljs
+++ b/cljs-server/cljs_cheatsheet_server/core.cljs
@@ -285,11 +285,12 @@
         [:tr
           [:td.label-9e0b7 "Test"]
           [:td.body-885f4
-            (FnLink "char")
             (FnLink "string?")
             (CodeText "(clojure.string/)")
-            (FnLink "includes?" clj-string-ns)
-            (FnLink "blank?" clj-string-ns)]]]]])
+            (FnLink "blank?" clj-string-ns)
+            (FnLink "starts-with?" clj-string-ns)
+            (FnLink "ends-with?" clj-string-ns)
+            (FnLink "includes?" clj-string-ns)]]]]])
 
 
 (defn AtomsSection []
diff --git a/docfiles/cljs.core_emptyQMARK.cljsdoc b/docfiles/cljs.core_emptyQMARK.cljsdoc
index a4ffe2e..3a71856 100644
--- a/docfiles/cljs.core_emptyQMARK.cljsdoc
+++ b/docfiles/cljs.core_emptyQMARK.cljsdoc
@@ -12,3 +12,4 @@ Please use the idiom `(seq x)` rather than `(not (empty? x))`.
 
 ===== Related
 cljs.core/seq
+clojure.string/blank?
diff --git a/docfiles/clojure.string_blankQMARK.cljsdoc b/docfiles/clojure.string_blankQMARK.cljsdoc
index d4b2d5a..d945e57 100644
--- a/docfiles/clojure.string_blankQMARK.cljsdoc
+++ b/docfiles/clojure.string_blankQMARK.cljsdoc
@@ -9,3 +9,4 @@ clojure.string/blank?
 True if `s` is nil, empty, or contains only whitespace.
 
 ===== Related
+cljs.core/empty?
diff --git a/docfiles/clojure.string_ends-withQMARK.cljsdoc b/docfiles/clojure.string_ends-withQMARK.cljsdoc
new file mode 100644
index 0000000..45865d8
--- /dev/null
+++ b/docfiles/clojure.string_ends-withQMARK.cljsdoc
@@ -0,0 +1,13 @@
+===== Name
+clojure.string/ends-with?
+
+===== Signature
+[s substr]
+
+===== Description
+
+True if `s` ends with `substr`.
+
+===== Related
+clojure.string/starts-with?
+clojure.string/includes?
diff --git a/docfiles/clojure.string_includesQMARK.cljsdoc b/docfiles/clojure.string_includesQMARK.cljsdoc
index ad7f41d..cffe6c7 100644
--- a/docfiles/clojure.string_includesQMARK.cljsdoc
+++ b/docfiles/clojure.string_includesQMARK.cljsdoc
@@ -11,3 +11,5 @@ True if `s` includes `substr`.
 ===== Related
 cljs.core/re-find
 cljs.core/contains?
+clojure.string/starts-with?
+clojure.string/ends-with?
diff --git a/docfiles/clojure.string_starts-withQMARK.cljsdoc b/docfiles/clojure.string_starts-withQMARK.cljsdoc
new file mode 100644
index 0000000..fc7466a
--- /dev/null
+++ b/docfiles/clojure.string_starts-withQMARK.cljsdoc
@@ -0,0 +1,13 @@
+===== Name
+clojure.string/starts-with?
+
+===== Signature
+[s substr]
+
+===== Description
+
+True if `s` starts with `substr`.
+
+===== Related
+clojure.string/ends-with?
+clojure.string/includes?