[slime-devel] Small typo in the inspector

[Torsten Poulin]

I noticed a small type in the inspector in inspect-for-emacs. My
patch also makes it print the word "symbol" without a plural s
when applicable.

/Torsten

Index: swank.lisp
===================================================================
RCS file: /project/slime/cvsroot/slime/swank.lisp,v
retrieving revision 1.235
diff -u -r1.235 swank.lisp
--- swank.lisp	14 Sep 2004 16:01:51 -0000	1.235
+++ swank.lisp	14 Sep 2004 20:56:06 -0000
@@ -2778,16 +2778,16 @@
               (:newline)
               ,(if (null external-symbols)
                    "0 external symbols."
-                   `(:value ,external-symbols ,(format nil "~D external symbols." (length external-symbols))))
+                   `(:value ,external-symbols ,(format nil "~D external symbol~:P." (length external-symbols))))
               (:newline)
               ,(if (null internal-symbols)
                    "0 internal symbols."
-                   `(:value ,internal-symbols ,(format nil "~D internals symbols." (length internal-symbols))))
+                   `(:value ,internal-symbols ,(format nil "~D internal symbol~:P." (length internal-symbols))))
               (:newline)
               ,(if (null (package-shadowing-symbols package))
                    "0 shadowed symbols."
                    `(:value ,(package-shadowing-symbols package)
-                            ,(format nil "~D shadowed symbols." (length (package-shadowing-symbols package)))))))))
+                            ,(format nil "~D shadowed symbol~:P." (length (package-shadowing-symbols package)))))))))
 
 (defmethod inspect-for-emacs ((pathname pathname) (inspector t))
   (declare (ignore inspector))