Fix a bug in random-string-alpha/0

Formerly the 0-arity case wasn't lowercasing.

Also update random-string to use alphabetic-string for it's 0-arity case
to keep it inline with the 1-arity case.

Signed-off-by: Josh Partlow <jpartlow@glatisant.org>

Author: jpartlow

src/puppetlabs/puppetdb/random.clj

@@ -57,13 +57,13 @@
 
 (defn random-string
   "Generate a random string of optional length"
-  ([] (.nextAlphabetic (RandomStringUtils/secure) (inc (rand-int 10))))
+  ([] (alphabetic-string (inc (rand-int 10))))
   ([length]
    (alphabetic-string length)))
 
 (defn random-string-alpha
   "Generate a random string of optional length, only lower case alphabet chars"
-  ([] (random-string (inc (rand-int 10))))
+  ([] (random-string-alpha (inc (rand-int 10))))
   ([length]
    (.toLowerCase (alphabetic-string length))))