From: ueno <ueno>
Date: Sun, 28 Apr 2002 03:19:51 +0000 (+0000)
Subject: * lsdb.el (lsdb-insert-x-face-asynchronously): Check whether the
X-Git-Tag: lsdb-0_2~1
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=07621c45acbc6e8ebc4d3d41264d58362d23fdcc;p=elisp%2Flsdb.git

* lsdb.el (lsdb-insert-x-face-asynchronously): Check whether the
marker buffer is deleted.

* README: Add instruction for x-face-e21.
---

diff --git a/README b/README
index 0b45194..426c77d 100644
--- a/README
+++ b/README
@@ -69,6 +69,13 @@ If you use MU-CITE, put the following lines into your ~/.emacs:
 (eval-after-load "mu-cite"
   '(lsdb-mu-insinuate))
 
+If you want to use x-face-e21 instead of the LSDB's builtin X-Face
+functions, set lsdb-insert-x-face-function as follows:
+(setq lsdb-insert-x-face-function
+      (lambda (x-face)
+	(require 'x-face-e21)
+	(insert-image (x-face-create-image x-face :scale-factor 0.5))))
+
 .* Bug reports
 If you found bugs, please drop a note to the EMACS-MIME Mailing List:
 
diff --git a/lsdb.el b/lsdb.el
index f007012..90b3761 100644
--- a/lsdb.el
+++ b/lsdb.el
@@ -1253,7 +1253,8 @@ the user wants it."
        process
        `(lambda (process string)
 	  (unwind-protect
-	      (when (equal string "finished\n")
+	      (when (and (buffer-live-p (marker-buffer ,marker))
+			 (equal string "finished\n"))
 		(let ((data
 		       (with-current-buffer (process-buffer process)
 			 (set-buffer-multibyte nil)