From: Matt Birkholz <matt@birkholz.chandler.az.us>
Date: Fri, 23 Aug 2013 07:07:49 +0000 (-0700)
Subject: gtk-screen: DISPLAY need not be set when compiling.
X-Git-Tag: mit-scheme-pucked-9.2.12~366^2~32
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=88cd7a484d7ae3ad1f4060d0d82cbdec91d54dbb;p=mit-scheme.git

gtk-screen: DISPLAY need not be set when compiling.
---

diff --git a/src/gtk-screen/compile.scm b/src/gtk-screen/compile.scm
index dcd4a70fb..d6db56c99 100644
--- a/src/gtk-screen/compile.scm
+++ b/src/gtk-screen/compile.scm
@@ -4,6 +4,7 @@
 
 (fluid-let ((load/suppress-loading-message? #t))
   (load-option 'CREF)
-  (load-option 'GTK))
+  ;; DISPLAY need not be set.
+  (ignore-errors (lambda () (load-option 'GTK))))
 
 (compile-system "gtk-screen" (directory-pathname (current-load-pathname)))
\ No newline at end of file