313 |
(defun diff-end-of-hunk (&optional style) |
(defun diff-end-of-hunk (&optional style) |
314 |
(if (looking-at diff-hunk-header-re) (goto-char (match-end 0))) |
(if (looking-at diff-hunk-header-re) (goto-char (match-end 0))) |
315 |
(let ((end (and (re-search-forward (case style |
(let ((end (and (re-search-forward (case style |
316 |
(unified "^[^-+# \\]") |
;; A `unified' header is ambiguous. |
317 |
|
(unified (concat "^[^-+# \\]\\|" |
318 |
|
diff-file-header-re)) |
319 |
(context "^[^-+#! \\]") |
(context "^[^-+#! \\]") |
320 |
(normal "^[^<>#\\]") |
(normal "^[^<>#\\]") |
321 |
(t "^[^-+#!<> \\]")) |
(t "^[^-+#!<> \\]")) |