Mercurial > emacs
comparison lisp/ediff.el @ 11057:9081dcfc25ae
(ediff-patch-buffer): Use buffer name in error message.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Sat, 18 Mar 1995 01:12:12 +0000 |
| parents | e168f57ece92 |
| children | f8238a1ab991 |
comparison
equal
deleted
inserted
replaced
| 11056:e168f57ece92 | 11057:9081dcfc25ae |
|---|---|
| 2489 | 2489 |
| 2490 (let* ((file-buffer (get-buffer buffer-name)) | 2490 (let* ((file-buffer (get-buffer buffer-name)) |
| 2491 (file-name (if file-buffer (buffer-file-name file-buffer)))) | 2491 (file-name (if file-buffer (buffer-file-name file-buffer)))) |
| 2492 (if (not file-name) | 2492 (if (not file-name) |
| 2493 (error "Buffer %s doesn't exist or doesn't visit any file. Why patch?" | 2493 (error "Buffer %s doesn't exist or doesn't visit any file. Why patch?" |
| 2494 file-name)) | 2494 buffer-name)) |
| 2495 | 2495 |
| 2496 (ediff-patch-file file-name startup-hooks))) | 2496 (ediff-patch-file file-name startup-hooks))) |
| 2497 | 2497 |
| 2498 | 2498 |
| 2499 (defun ediff-get-patch-buffer (dir) | 2499 (defun ediff-get-patch-buffer (dir) |