added modes/modes.h autogeneration in scons

SConstruct

@@ -8,9 +8,23 @@ env.ParseConfig("pkg-config --cflags --libs glib-2.0 gdk-2.0 atk gtk+-2.0 gtkgle
 genLoadFile = Builder(action = 'perl genLoadFile.pl --root=logo $SOURCES')
 env.Append(BUILDERS = {'LoadFile' : genLoadFile})
 
+def gen_modes(target, source, env):
+    f = open(str(target[0]), 'w')
+    for s in source:
+        f.write("#include \"%s\"\n" % str(s))
+    f.close()
+    return None;
+
+genModes = Builder(action = gen_modes)
+env.Append(BUILDERS = {'Modes' : genModes})
+
 sources = [Glob('*.c'), Glob('*.cc'), Glob('LoadFile/*.cc')]
+
 env.LoadFile('LoadFile-gen.inc', load_files)
 env.Depends('LoadFile-gen.inc', 'genLoadFile.pl')
+
+env.Modes('modes/modes.h', Glob('modes/*.h'))
+
 dwss = env.Program('dwss', sources)
 
 env.Install(install_dir, dwss)