Lines Matching +defs:read +defs:only
66 (defcustom query-replace-skip-read-only nil
67 "*Non-nil means `query-replace' and friends ignore read-only matches."
96 (defun query-replace-read-from (prompt regexp-flag)
108 (read-from-minibuffer
150 (setq pos (read-from-string to))
175 (defun query-replace-read-to (from prompt regexp-flag)
180 (to (read-from-minibuffer
189 (defun query-replace-read-args (prompt regexp-flag &optional noerror)
191 (barf-if-buffer-read-only))
192 (let* ((from (query-replace-read-from prompt regexp-flag))
194 (query-replace-read-to from prompt regexp-flag))))
218 only matches surrounded by word boundaries.
223 (query-replace-read-args
261 only matches surrounded by word boundaries.
287 (query-replace-read-args
336 only matches that are surrounded by word boundaries.
340 (barf-if-buffer-read-only)
346 (query-replace-read-from "Query replace regexp" t)))
347 (to (list (read-from-minibuffer
371 if non-nil, means replace only matches surrounded by word boundaries.
390 (read-from-minibuffer "Map query replace (regexp): "
393 (to (read-from-minibuffer
431 only matches surrounded by word boundaries.
447 (query-replace-read-args
468 only matches surrounded by word boundaries.
504 (query-replace-read-args
519 "History list for some commands that read regular expressions.")
527 (defun keep-lines-read-args (prompt)
531 (list (read-from-minibuffer prompt nil nil nil
561 (barf-if-buffer-read-only)
562 (keep-lines-read-args "Keep lines (containing match for regexp): ")))
612 The line point is in is deleted if and only if it contains a
619 Lines partially contained in this region are deleted if and only if
634 (barf-if-buffer-read-only)
635 (keep-lines-read-args "Flush lines (containing match for regexp): ")))
679 (keep-lines-read-args "How many matches for (regexp): "))
902 '(read-only invisible intangible field mouse-face help-echo local-map keymap
937 (defun occur-read-primary-args ()
940 (read-from-minibuffer
988 (interactive (occur-read-primary-args))
998 (let* ((bufs (list (read-buffer "First buffer to search: "
1003 (setq buf (read-buffer
1004 (if (eq read-buffer-function 'ido-read-buffer)
1012 (occur-read-primary-args)))
1024 (read-from-minibuffer
1035 (occur-read-primary-args)))
1068 (let ((inhibit-read-only t)
1093 (setq buffer-read-only t)
1123 ;; Set CODING only if the current buffer locally
1383 (read-string "Edit replacement string: "
1410 This function returns nil if and only if there were no matches to
1498 ;; For speed, use only integers and
1538 ;; Optionally ignore matches that have a read-only property.
1539 (unless (and query-replace-skip-read-only
1542 'read-only nil))
1551 (let ((inhibit-read-only
1552 query-replace-skip-read-only))
1583 (setq key (read-event))
1584 ;; Necessary in case something happens during read-event
1678 (read-string "Edit replacement string: "
1708 ;; Force lazy rehighlighting only after replacements