From 04845336c147c1f30527828abab5a38bdb76e1ec Mon Sep 17 00:00:00 2001 From: Bruno Haible Date: Mon, 7 Jan 2002 17:53:01 +0000 Subject: Kill ediff buffers after quitting the ediff session. --- misc/ChangeLog | 5 +++++ misc/po-mode.el | 7 +++++-- 2 files changed, 10 insertions(+), 2 deletions(-) (limited to 'misc') diff --git a/misc/ChangeLog b/misc/ChangeLog index bc47b14..aef1b0a 100644 --- a/misc/ChangeLog +++ b/misc/ChangeLog @@ -1,3 +1,8 @@ +2001-11-20 Karl Eichwalder + + * po-mode.el (po-ediff-buffers-exit-recursive): Kill ediff buffers + after quitting the ediff session. + 2002-01-03 Bruno Haible * gettextize.in: Recommend installation of gettext.h. diff --git a/misc/po-mode.el b/misc/po-mode.el index dd9ae0a..57d5aad 100644 --- a/misc/po-mode.el +++ b/misc/po-mode.el @@ -2037,8 +2037,10 @@ The string is properly recommented before the replacement occurs." (defun po-ediff-buffers-exit-recursive (b1 b2 oldbuf end) "Ediff buffer B1 and B2, pop back to OLDBUF and replace the old variants. -This function will delete the first two variants in OLDBUF and replace this -text with the contents of B2. +This function will delete the first two variants in OLDBUF, call +`ediff-buffers' to compare both strings and replace the two variants in +OLDBUF with the contents of B2. +Once done kill B1 and B2. For more info cf. `po-subedit-ediff'." (ediff-buffers b1 b2) @@ -2046,6 +2048,7 @@ For more info cf. `po-subedit-ediff'." (pop-to-buffer oldbuf) (delete-region (point-min) end) (insert-buffer b2) + (mapc 'kill-buffer `(,b1 ,b2)) (display-buffer entry-buffer t)) (defun po-subedit-ediff () -- cgit v1.1