Refactor :question-read-p in data-here as a separate function