Lines Matching +defs:read +defs:only
35 (defun read-number (prompt &optional integers-only)
42 (predicate (if integers-only 'integerp 'numberp)))
44 (let ((input-string (read-string prompt)))
46 (setq number (read input-string))
52 (if integers-only "an integer" "a number"))
60 (defun read-mouse-position (frame)
194 (defalias 'find-file-read-only-new-screen 'find-file-read-only-other-frame)