Wed Apr  8 17:14:11 CEST 2009  Tobias Rautenkranz <tobias@rautenkranz.ch>
  * Improve property test
diff -rN -u old-qt.tests/src/properties.lisp new-qt.tests/src/properties.lisp
--- old-qt.tests/src/properties.lisp	2014-10-30 07:59:04.000000000 +0100
+++ new-qt.tests/src/properties.lisp	2014-10-30 07:59:04.000000000 +0100
@@ -17,6 +17,7 @@
     (setf (qt:property o 'object-name) "fooBar")
     (5am:is (string= (qt:property o 'object-name) "fooBar"))
     (5am:is (string= (qt:property o "objectName") "fooBar"))
+    (5am:is (string= (cxx:object-name o) "fooBar"))
     
     (5am:is (eql nil (qt:property-p o 'foo)))
     (setf (qt:property o 'foo) "bar")