Lines Matching +defs:write +defs:region
406 ;; Suppress write-file and save-buffer
407 (define-key emerge-fast-keymap [remap write-file] 'emerge-query-write-file)
938 (emerge-write-and-delete file-out)))
950 (write-region (point-min) (point-max) emerge-file-A nil 'no-message))
953 (write-region (point-min) (point-max) emerge-file-B nil 'no-message))
975 (write-region (point-min) (point-max) emerge-file-A nil 'no-message))
978 (write-region (point-min) (point-max) emerge-file-B nil 'no-message))
981 (write-region (point-min) (point-max) emerge-file-ancestor nil
1031 (emerge-write-and-delete file-out)
1055 (emerge-write-and-delete file-out)
1119 (write-region (point-min) (point-max) emerge-file-A nil 'no-message)
1127 (write-region (point-min) (point-max) emerge-file-B nil 'no-message)
1158 (write-region (point-min) (point-max) emerge-file-A nil 'no-message)
1166 (write-region (point-min) (point-max) emerge-file-B nil 'no-message)
1174 (write-region (point-min) (point-max) emerge-ancestor nil 'no-message)
1430 ;; Suppress write-file and save-buffer
1431 (substitute-key-definition 'write-file
1432 'emerge-query-write-file
1437 (define-key emerge-edit-keymap [remap write-file] 'emerge-query-write-file)
1569 (defun emerge-write-and-delete (file-out)
1582 (write-file file-out)))
1587 "Bring the highlighted region of all three merge buffers into view.
1608 (emerge-position-region
1616 (emerge-position-region
1624 (emerge-position-region
1782 ;; Attempt to show the region nicely.
1783 ;; If there are min-lines lines above and below the region, then don't do
1785 ;; If not, recenter the region to make it so.
1787 ;; so the entire region shows.
1788 ;; If that isn't possible, show the top of the region.
1790 (defun emerge-position-region (beg end pos)
1791 ;; First test whether the entire region is visible with
1806 ;; Determine the number of lines that the region occupies
1866 but usually means to not write over one of the original files, or to signal
1934 (delete-region merge-begin merge-end)
1963 (delete-region merge-begin merge-end)
2082 (copy-region-as-kill A-begin A-end))))
2096 (copy-region-as-kill B-begin B-end))))
2529 "Copy region into `emerge-combine-versions-template'.
2578 (delete-region merge-begin merge-end)
2773 (error "This difference region has been edited")))))))
2922 ;;; Functions that query the user before he can write out the current buffer.
2924 (defun emerge-query-write-file ()
2925 "Ask the user whether to write out an incomplete merge.
2926 If answer is yes, call `write-file' to do so. See `emerge-query-and-call'
2929 (emerge-query-and-call 'write-file))
2939 "Ask the user whether to save or write out the incomplete merge.
2942 (if (yes-or-no-p "Do you really write to write out this unfinished merge? ")
3133 ;; regardless of whether we can write into it or not.