getstring

(getstring [spaces] [prompt])

Asks for a text. If the first argument is not nil, Space is part of the text and only Enter ends it. Returns "" on Enter.

(setq name (getstring T "\nLayer name: "))