about summary refs log blame commit diff
path: root/users/wpcarro/emacs/pkgs/string/tests.el
blob: 92290c6db803eaec3cab9056eab61d26f16dd028 (plain) (tree)





















                                                                                
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; 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")))