Fixes to support dumping scx into images

pkg-def.scm

@@ -1,4 +1,4 @@
-(define-package "scx" (0 2)
+(define-package "scx" (0 3)
   ((install-lib-version (1 0))
    (options (with-xft "Compile with Xft support" "<yes/no>" #t #t #f
 		      ,parse-boolean ,show-boolean)))
@@ -32,6 +32,7 @@
 	(load-xft-packages (get-option-value 'with-xft)))
     (write-to-load-script
      `((new-package)
+       (structure 'load-scx '(export))
        (load-package 'dynamic-externals)
        (load-package 'reinitializers)
        (open 'scheme-with-scsh)
@@ -41,8 +42,9 @@
        (open 'configure)
        (open 'signals)
        (open 'reinitializers)
-       ,@(map (lambda (x) `(run ',x)) tmpl-libtool-la-reader)
        (run '(define (init-scx)
+               ,@ tmpl-libtool-la-reader
+
                (let* ((lib-dir (string-append ,libdir "/" (host)))
 		    (la-file-name (string-append lib-dir "/libscx.la"))
 		    (initializer-name "scx_init_xlib"))