diff --git a/ChangeLog b/ChangeLog
index c91dba7..cfe912f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -40,7 +40,7 @@
     Tcl_Obj mem leak.
 
     * added the command readline text and readline update
-    that retrieve the current input and redraw it respecively.
+    that retrieve the current input and redraw it respectively.
 
 2000-07-27  Johannes Zellner <johannes@zellner.org>
 
diff --git a/sample.tclshrc b/sample.tclshrc
index e600455..11ef8ea 100644
--- a/sample.tclshrc
+++ b/sample.tclshrc
@@ -44,7 +44,7 @@ if {$tcl_interactive} {
     #
     # tclreadline::Print no
 
-    # uncomment the folling line, if you want
+    # uncomment the following line, if you want
     # to change tclreadline's print behaviour
     # frequently with less typing.
     #
diff --git a/tclreadlineCompleter.tcl b/tclreadlineCompleter.tcl
index 74d3bf1..ec7d832 100644
--- a/tclreadlineCompleter.tcl
+++ b/tclreadlineCompleter.tcl
@@ -816,7 +816,7 @@ namespace eval tclreadline {
     }
 
     # the following two channel proc's make use of
-    # the brandnew (Sep 99) `file channels' command
+    # the brand new (Sep 99) `file channels' command
     # but have some fallback behaviour for older
     # tcl version.
     #
@@ -2696,7 +2696,7 @@ namespace eval tclreadline {
 
     # TODO import ! -force
     proc complete(namespace) {text start end line pos mod} {
-        # TODO dosn't work ???
+        # TODO doesn't work ???
         set space_matches [namespace children :: [string trim ${mod}*]]
         set cmd [Lindex $line 1]
         switch -- $pos {