X-Git-Url: http://christophe.rhodes.io/gitweb/?p=swankr.git;a=blobdiff_plain;f=swank.R;h=d72103fc309fc33c57b5c9cd0ca13f4eaa60ac36;hp=ff22caa064766957c9c27a649b3d1afbe63155d5;hb=a8a7e4725d583158cfc096a687a897763e00579a;hpb=a2977df7dc0b477dfb5adedc2c9d1c32cec83e15

diff --git a/swank.R b/swank.R
index ff22caa..d72103f 100644
--- a/swank.R
+++ b/swank.R
@@ -491,7 +491,7 @@ inspectObject <- function(slimeConnection, object) {
 
 valuePart <- function(istate, object, string) {
   list(quote(`:value`),
-       if(is.null(string)) printToString(object) else string,
+       if(is.null(string)) paste(printToString(object),collapse=" ") else string,
        assignIndexInParts(object, istate))
 }