comments, whitespace

1 files changed, 7 insertions, 3 deletions

diff --git a/macosx/tkMacOSXHLEvents.c b/macosx/tkMacOSXHLEvents.c
index bc85386..2f5a0b7 100644
--- a/macosx/tkMacOSXHLEvents.c
+++ b/macosx/tkMacOSXHLEvents.c
@@ -11,7 +11,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tkMacOSXHLEvents.c,v 1.17 2008/07/22 17:00:20 das Exp $
+ * RCS: @(#) $Id: tkMacOSXHLEvents.c,v 1.18 2008/09/02 16:10:55 das Exp $
  */
 
 #include "tkMacOSXPrivate.h"
@@ -329,7 +329,7 @@ OdocHandler(
     }
 
     /*
-     * If we get any errors wil retrieving our parameters we just return with
+     * If we get any errors while retrieving our parameters we just return with
      * no error.
      */
 
@@ -418,7 +418,7 @@ PrintHandler(
     }
 
     /*
-     * If we get any errors wil retrieving our parameters we just return with
+     * If we get any errors while retrieving our parameters we just return with
      * no error.
      */
 
@@ -447,6 +447,10 @@ PrintHandler(
 	}
     }
 
+    /*
+     * Now handle the event by evaluating a script.
+     */
+
     if (Tcl_EvalEx(interp, Tcl_DStringValue(&command),
 	    Tcl_DStringLength(&command), TCL_EVAL_GLOBAL) != TCL_OK) {
 	Tcl_BackgroundError(interp);