Fix double space when printing a qt:object.
src/qstring.lisp
Sun Aug 2 13:29:13 CEST 2009 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Fix double space when printing a qt:object.
--- old-qt.gui/src/qstring.lisp 2014-10-30 07:43:52.000000000 +0100
+++ new-qt.gui/src/qstring.lisp 2014-10-30 07:43:52.000000000 +0100
@@ -47,3 +47,9 @@
(define-from-lisp-translation ("const QString&" "QString") string
coerce-qstring)
+
+(defmethod print-object ((object qt:byte-array) stream)
+ (if (null-pointer-p (pointer object))
+ (call-next-method)
+ (print-unreadable-object (object stream :type t :identity t)
+ (prin1 (cxx:data object) stream))))