[slime-cvs] CVS slime/contrib

[heller]

Update of /project/slime/cvsroot/slime/contrib
In directory clnet:/tmp/cvs-serv30901

Modified Files:
	swank-fancy-inspector.lisp 
Log Message:
(emacs-inspect pathname): Fix last change.


--- /project/slime/cvsroot/slime/contrib/swank-fancy-inspector.lisp	2008/02/09 18:47:09	1.9
+++ /project/slime/cvsroot/slime/contrib/swank-fancy-inspector.lisp	2008/02/09 19:23:41	1.10
@@ -535,10 +535,10 @@
 
 
 (defmethod emacs-inspect ((pathname pathname))
-          (append (if (wild-pathname-p pathname)
+          (list* (if (wild-pathname-p pathname)
 		      "A wild pathname."
 		      "A pathname.")
-		  '((:newline))
+		  '(:newline)
 		  (label-value-line*
                    ("Namestring" (namestring pathname))
                    ("Host"       (pathname-host pathname))