gtk: Fix `make check` to NOT hang when is DISPLAY not set.
authorMatt Birkholz <matt@birkholz.chandler.az.us>
Mon, 16 Sep 2013 17:46:21 +0000 (10:46 -0700)
committerMatt Birkholz <matt@birkholz.chandler.az.us>
Mon, 16 Sep 2013 17:46:21 +0000 (10:46 -0700)
src/gtk/check.scm

index 0dd5919017513252d964672a84092d6e26b4c8d7..d9dd90fdcf669b69b0b8231065a7df4afbffff5a 100644 (file)
@@ -8,5 +8,6 @@
        (cons dirname (access library-directory-path env)))
   (set! *initial-options-file* (merge-pathnames "check-optiondb" dirname)))
 
-(if (not (warn-errors? (lambda () (load-option 'GTK))))
+(load-option 'GTK)
+(if (gtk-thread-running?)
     (load "gtk-check" (->environment '(GTK))))
\ No newline at end of file