Rename sql-keyword-hyphenize to sql-keyword-hyphenate

r0man · May 28, 2014 · 0497f8b · 0497f8b
1 parent fa94860
commit 0497f8b
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 8 deletions.
diff --git a/src/sqlingvo/db.clj b/src/sqlingvo/db.clj
@@ -16,7 +16,7 @@
     ((or sql-keyword sql-name-underscore) x))
   Nameable
   (sql-name [db x]
-    ((or sql-name sql-keyword-hyphenize) x))
+    ((or sql-name sql-keyword-hyphenate) x))
   Quoteable
   (sql-quote [db x]
     ((or sql-quote sql-quote-backtick)
@@ -35,35 +35,35 @@
 (defdb mysql
   "The world's most popular open source database."
   :name sql-name-underscore
-  :keyword sql-keyword-hyphenize
+  :keyword sql-keyword-hyphenate
   :quote sql-quote-backtick)
 
 (defdb postgresql
   "The world's most advanced open source database."
   :name sql-name-underscore
-  :keyword sql-keyword-hyphenize
+  :keyword sql-keyword-hyphenate
   :quote sql-quote-double-quote)
 
 (defdb oracle
   "Oracle Database."
   :name sql-name-underscore
-  :keyword sql-keyword-hyphenize
+  :keyword sql-keyword-hyphenate
   :quote sql-quote-double-quote)
 
 (defdb sqlite
   "The in-process SQL database engine."
   :name sql-name-underscore
-  :keyword sql-keyword-hyphenize
+  :keyword sql-keyword-hyphenate
   :quote sql-quote-double-quote)
 
 (defdb sqlserver
   "Microsoft SQL server."
   :name sql-name-underscore
-  :keyword sql-keyword-hyphenize
+  :keyword sql-keyword-hyphenate
   :quote sql-quote-double-quote)
 
 (defdb vertica
   "The Real-Time Analytics Platform."
   :name sql-name-underscore
-  :keyword sql-keyword-hyphenize
+  :keyword sql-keyword-hyphenate
   :quote sql-quote-double-quote)
diff --git a/src/sqlingvo/util.clj b/src/sqlingvo/util.clj
@@ -72,7 +72,7 @@
 (defn sql-name-underscore [x]
   (map-sql-name #(replace %1 "-" "_") x))
 
-(defn sql-keyword-hyphenize [x]
+(defn sql-keyword-hyphenate [x]
   (keyword (map-sql-name #(replace (name %1) "_" "-") x)))
 
 (defn- sql-quote-char [x before after]