removed unnecessary begin statements

2017-04-21 18:14:16 -04:00 · 2017-04-21 18:14:16 -04:00 · ce93a60d0e
commit ce93a60d0e
parent 42eceeb36f
1 changed files with 2 additions and 3 deletions
--- a/Hermes/Hermes_Gui1.3.rkt
+++ b/Hermes/Hermes_Gui1.3.rkt
@ -12,8 +12,7 @@
 (provide make-gui)

 (define (make-gui)
-  (begin
-    ;;Create the frame
+    ;;Create the frame/window with title "Example5", width 500 and height 700
    (define main-frame (new frame%
                            [label "Example5"]
                            [width 500]
@ -144,7 +143,7 @@
            (else (error "Invalid Request" command))
            ))
    ;;dispatch goes below that
-    dispatch))
+    dispatch)


 ;This one displays information