blob: 92290c6db803eaec3cab9056eab61d26f16dd028 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Dependencies
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'ert)
(require 'string)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Tests
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(ert-deftest string-caps->kebab ()
(string= "foo-bar-baz" (string-caps->kebab "FOO_BAR_BAZ")))
(ert-deftest string-kebab->caps ()
(string= "FOO_BAR_BAZ" (string-kebab->caps "foo-bar-baz")))
(ert-deftest string-lower->caps ()
(string= "FOO_BAR_BAZ" (string-lower->caps "foo bar baz")))
(ert-deftest string-lower->kebab ()
(string= "foo-bar-baz" (string-lower->kebab "foo bar baz")))
|
