From 882f738b7595b01f8b4f6b0fc9303233742a59de Mon Sep 17 00:00:00 2001
From: Johannes Hofmann <Johannes.Hofmann@gmx.de>
Date: Thu, 10 Nov 2005 21:49:21 +0100
Subject: check for FLTK_SCHEME environment variable

---
 src/gipfel.cxx | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/gipfel.cxx b/src/gipfel.cxx
index e1a12d1..8afc1ce 100644
--- a/src/gipfel.cxx
+++ b/src/gipfel.cxx
@@ -345,7 +345,12 @@ int main(int argc, char** argv) {
     exit(1);
   }
 
-  Fl::scheme("plastic");
+  Fl::get_system_colors();
+  if (getenv("FLTK_SCHEME")) {
+    Fl::scheme(NULL);
+  } else {
+    Fl::scheme("plastic");
+  }
 
   control_win = create_control_window();
 
-- 
cgit v1.2.3