Anonymous avatar Anonymous committed d79d443

remove k-to-colname and colname-to-k functions (they look goofy)

Comments (0)

Files changed (2)


 ;; ===== Keyword to/from string conversion =====
-(defn k-to-colname
-  "Convert a keyword to database column name (string) and replace dash with
-  underscore."
-  [k]
-  (let [n (name k)
-        s (.replace n "-" "_")]
-    s))
-(defn colname-to-k
-  "Convert database column name (string) to keyword after replacing underscore
-  with dash."
-  [^String s]
-  (let [n (.replace s "_" "-")]
-    (keyword n)))
 (defn k-to-camelstr
   "Convert keyword to camel-case string and treat dash as case-changer.


 (deftest test-keyword-string-conversion
-  (testing "k-to-colname"
-    (is= k-to-colname {:a "a" :a-b "a_b"}))
-  (testing "colname-to-k"
-    (is= colname-to-k {"a" :a "a_b" :a-b}))
   (testing "k-to-camelstr"
     (is= k-to-camelstr {:-            ""
                         :to-do        "toDo"       ; dash triggers upper-case
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.