From 2be45a4f15c956b17ab52d3467bbf2e6cd93c074 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Tue, 14 Sep 2021 13:03:34 +0530
Subject: Delete unused camel->kebab function.

* dump.scm (camel->kebab): Delete function.
---
 dump.scm | 9 ---------
 1 file changed, 9 deletions(-)

diff --git a/dump.scm b/dump.scm
index 64f1c68..187fadf 100755
--- a/dump.scm
+++ b/dump.scm
@@ -75,15 +75,6 @@
 
 ;;; Dump tables
 
-(define (camel->kebab str)
-  (call-with-output-string
-    (lambda (port)
-      (string-for-each (lambda (c)
-                         (when (and (not (zero? (port-position port)))
-                                    (char-set-contains? char-set:upper-case c))
-                           (put-char port #\-))
-                         (put-char port (char-downcase c)))
-                       str))))
 
 (define (snake->lower-camel str)
   (let ((char-list (string->list str)))
-- 
cgit v1.2.3