Name the lisppaste message pop-up buffer `*lisppaste*', not

`*lisppaste-error*', since the message is not necessarily of an
error.

diff --git a/v7/src/edwin/lisppaste.scm b/v7/src/edwin/lisppaste.scm
index 77247eaac4850f69456bb1b7643ce6c447b5ebc8..6ae1da5d6e59e5c2fcbfb59691df81316d02a951 100644 (file)
--- a/v7/src/edwin/lisppaste.scm
+++ b/v7/src/edwin/lisppaste.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: lisppaste.scm,v 1.2 2008/10/18 21:20:25 riastradh Exp $
+$Id: lisppaste.scm,v 1.3 2009/02/18 07:46:59 riastradh Exp $
 
 This code is written by Taylor R. Campbell and placed in the Public
 Domain.
@@ -358,5 +358,5 @@ With a prefix argument, list pastes starting at a certain number."
                 (window-x-size (typein-window)))))
       (message string)
       (string->temporary-buffer string
-                                " *lisppaste-error*"
+                                " *lisppaste*"
                                 '(READ-ONLY SHRINK-WINDOW FLUSH-ON-SPACE))))