diff --git a/Makefile b/Makefile
new file mode 100644
index 0000000..a746b47
--- /dev/null
+++ b/Makefile
@@ -0,0 +1,9 @@
+
+
+all:
+ @echo "Use 'make clean' to cleanup racket backup files"
+
+
+clean:
+ @find . -type f -name "*~" -exec rm -f {} \;
+ @echo "Cleaned"
diff --git a/example1/example-1-second.html b/example1/example-1-second.html
new file mode 100644
index 0000000..b552a53
--- /dev/null
+++ b/example1/example-1-second.html
@@ -0,0 +1,20 @@
+
+
+
+
+
+
+ This is test 1
+
+
+ This is test 1
+
+
+
+
+
+
diff --git a/example1/example-1.html b/example1/example-1.html
index 63afb71..3a235e8 100644
--- a/example1/example-1.html
+++ b/example1/example-1.html
@@ -23,8 +23,8 @@
Opening a second page
And some other buttons
diff --git a/example1/example.rkt b/example1/example.rkt
index b07538b..4adbb85 100644
--- a/example1/example.rkt
+++ b/example1/example.rkt
@@ -70,9 +70,9 @@
(super html-loaded)
(ww-debug "CONNECTING BUTTONS")
- (let* ((dialog-btn (send this element 'app-button))
+ (let* ((dialog-btn (send this element 'dialog-button))
)
- (send dialog-btn connect 'click (λ (data)
+ (send dialog-btn connect 'click (λ (data)
(new example-1-dialog% [parent this])))
)