Sun May 24 23:29:56 CEST 2009  Tobias Rautenkranz <tobias@rautenkranz.ch>
  * Work around null pointer for references bug
diff -rN -u old-kde.examples/src/mandelbrot/mandelbrot.lisp new-kde.examples/src/mandelbrot/mandelbrot.lisp
--- old-kde.examples/src/mandelbrot/mandelbrot.lisp	2014-10-30 07:19:33.000000000 +0100
+++ new-kde.examples/src/mandelbrot/mandelbrot.lisp	2014-10-30 07:19:33.000000000 +0100
@@ -19,7 +19,7 @@
 
 (defun make-aboutdata ()
   (let ((app-name "kmandelbrot")
-        (catalog-name (cffi:null-pointer))
+        (catalog-name "") ;; not (null-pointer) (see smoke::conversion-pointer)
         (program-name (kde:ki18n "KMandelbrot"))
         (version "0.0.1")
         (description (kde:ki18n "KDE Mandelbrot program."))
@@ -28,15 +28,16 @@
         (homepage "http://tobias.rautenkranz.ch/lisp/cl-smoke/")
         (email "bugs@tobias.rautenkranz.ch"))
     (let ((aboutdata
-           (make-instance 'kde:about-data :args (list
-                                             app-name catalog-name program-name
-                                             version description
-                                             kde:about-data.+license-lgpl-v2+
-                                             copyright text homepage email))))
+           (make-instance 'kde:about-data 
+                          :args (list
+                                 app-name catalog-name program-name
+                                 version description
+                                 kde:about-data.+license-lgpl-v2+
+                                 copyright text homepage email))))
       (cxx:add-author aboutdata
-                     (kde:ki18n "Tobias Rautenkranz")
-                     (make-instance 'kde:localized-string)
-                     "tobias@rautenkranz.ch")
+                      (kde:ki18n "Tobias Rautenkranz")
+                      (make-instance 'kde:localized-string)
+                      "tobias@rautenkranz.ch")
       aboutdata)))
 
 (defun mandelbrot ()
@@ -71,9 +72,8 @@
       (cxx:set-focus mandelbrot)
       (setup-slot mandelbrot)
 
-      (cxx:add-resource-dir (kde:global.dirs)
-                            "data" resource-dir)
+      (cxx:add-resource-dir (kde:global.dirs) "data" resource-dir)
       (cxx:setup-gui window)
 
       (cxx:show window)
-      (qt:exec))))
+      (qt:exec window))))