From: Christoph Senjak <christoph@christoph-senjaks-macbook-pro.local>
Date: Thu, 20 Aug 2009 18:22:10 +0000 (+0200)
Subject: The GUI now has two windows. But somehow there is an error-message.
X-Git-Url: http://uxul.de/gitweb/?p=uxul-world.git;a=commitdiff_plain;h=c6551c92dfbdd81c34b483f177e2742fff7878ba

The GUI now has two windows. But somehow there is an error-message.
---

diff --git a/BUGS b/BUGS
index a3cbddf..2756efa 100644
--- a/BUGS
+++ b/BUGS
@@ -1,3 +1,5 @@
+2009/08/20 starting the level-editor produces an error.
+
 2009/04/09 Setting the Animation of Jumping doesnt always work correct
 
 2009/04/10 Random numeric type-errors
diff --git a/leveleditor.lisp b/leveleditor.lisp
index eac01d3..9f07362 100644
--- a/leveleditor.lisp
+++ b/leveleditor.lisp
@@ -71,9 +71,9 @@ form (x y object)."
 	   (current-upper-left (cons 0 0))
 	   (current-chosen-object 'uxul)
 	   (objects-and-arrows (make-instance 'ltk:frame))
+	   (grid-frame (make-instance 'ltk:toplevel))
 	   (object-frame (make-instance 'ltk:frame :master objects-and-arrows))
 	   (arrow-frame (make-instance 'ltk:frame :master objects-and-arrows))
-	   (grid-frame (make-instance 'ltk:frame))
 	   (right-button (make-instance 'ltk:button :text ">"
 					:master arrow-frame))
 	   (left-button (make-instance 'ltk:button :text "<"