db: stick to ASCII for pg generated names

This commit is contained in:
Ryan Culpepper 2014-10-03 12:51:29 -04:00
parent c50969d60e
commit f2c7218670

View File

@ -511,7 +511,7 @@
(define/private (generate-name)
(let ([n name-counter])
(set! name-counter (add1 name-counter))
(format "λmz_~a_~a" process-id n)))
(format "rkt_~a_~a" process-id n)))
(define/public (get-base) this)