Documentation typos

[ci skip]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@53332 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ext/tk/MANUAL_tcltklib.eng

@@ -232,7 +232,7 @@ module TclTklib
 
     _merge_tklist(str, str, ... )
        : Get a Tcl's list string from arguments with a Tcl/Tk's
-       : library function. Each arguemnt is converted to a valid
+       : library function. Each argument is converted to a valid
        : Tcl list element.
 
     _conv_listelement(str)
@@ -415,7 +415,7 @@ class TclTkIp
 
     _merge_tklist(str, str, ... )
        : Get a Tcl's list string from arguments with a Tcl/Tk's
-       : library function. Each arguemnt is converted to a valid
+       : library function. Each argument is converted to a valid
        : Tcl list element.
 
     _conv_listelement(str)

ext/tk/extconf.rb

@@ -113,7 +113,7 @@ end
 
 
 ##############################################################
-# fuctions
+# functions
 ##############################################################
 def is_win32?
   /mswin|mingw|cygwin|bccwin/ =~ RUBY_PLATFORM

ext/tk/lib/multi-tk.rb

@@ -41,7 +41,7 @@ end
 
 
 ################################################
-# exceptiopn to treat the return value from IP
+# exception to treat the return value from IP
 class MultiTkIp_OK < Exception
   def self.send(thread, ret=nil)
     thread.raise self.new(ret)

ext/tk/lib/tk.rb

@@ -2645,7 +2645,7 @@ if (/^(8\.[1-9]|9\.|[1-9][0-9])/ =~ Tk::TCL_VERSION && !Tk::JAPANIZED_TK)
         def ENCODING_TABLE.get_name(enc)
           orig_enc = enc
 
-          # unles enc, use system default
+          # unless enc, use system default
           #  1st: Ruby/Tk default encoding
           #  2nd: Tcl/Tk default encoding
           #  3rd: Ruby's default_external
@@ -2887,7 +2887,7 @@ if (/^(8\.[1-9]|9\.|[1-9][0-9])/ =~ Tk::TCL_VERSION && !Tk::JAPANIZED_TK)
     # from tkencoding.rb by ttate@jaist.ac.jp
     #attr_accessor :encoding
     def encoding=(name)
-      self.force_default_encoding = true  # for comaptibility
+      self.force_default_encoding = true  # for compatibility
       self.default_encoding = name
     end
 
@@ -5165,7 +5165,7 @@ class TkWindow<TkObject
               # try to configure
               configure(keys)
             rescue
-              # fail => includes options adaptable when creattion only?
+              # fail => includes options adaptable when creation only?
               begin
                 tk_call_without_enc('destroy', @path)
               rescue

ext/tk/lib/tk/autoload.rb

@@ -499,7 +499,7 @@ class << Tk
               replace_topobj(sym, obj)
 
             else # current_obj != topalias_defined?(sym)
-              # Maybe current_obj is defined by user. --> OWNER[sym] = faise
+              # Maybe current_obj is defined by user. --> OWNER[sym] = false
               # Keep Object::sym.
               @TOPLEVEL_ALIAS_OWNER[sym] = false
               @TOPLEVEL_ALIAS_TABLE[target][sym] = obj
@@ -542,7 +542,7 @@ class << Tk
 
         else # NOT topalias_defined?(sym)
           # Nobody controls ALIAS[sym].
-          # At leaset, current widget set doesn't control ALIAS[sym].
+          # At least, current widget set doesn't control ALIAS[sym].
           # Keep Object::sym (even if it is not defined)
           # Keep OWNER[sym].
           @TOPLEVEL_ALIAS_TABLE[target][sym] = obj
@@ -610,20 +610,20 @@ class << Tk
       if cur_obj = topobj_defined?(sym)
         if ! cur_obj.kind_of?(String) && (cur_alias = topalias_defined?(sym))
           if cur_alias.kind_of?(String)
-            # Mayby, user replaced Object::sym.
+            # Maybe, user replaced Object::sym.
             # Make Object::sym out of control.
             @TOPLEVEL_ALIAS_OWNER[sym] = false
           elsif cur_obj == cur_alias
-            # Possibley, defined normally. Backup it
+            # Possibly, defined normally. Backup it
             @TOPLEVEL_ALIAS_TABLE[current][sym] = cur_alias
           else
-            # Mayby, user replaced Object::sym.
+            # Maybe, user replaced Object::sym.
             # Make Object::sym out of control.
             @TOPLEVEL_ALIAS_OWNER[sym] = false
           end
         end
       else
-        # Mayby, user replaced Object::sym.
+        # Maybe, user replaced Object::sym.
         # Make Object::sym out of control.
         @TOPLEVEL_ALIAS_OWNER[sym] = false
       end
@@ -631,7 +631,7 @@ class << Tk
     when nil
       # Object::sym is out of control.
       if (cur_alias = topalias_defined?(sym)) && ! cur_alias.kind_of?(String)
-        # Possibley, defined normally. Backup it.
+        # Possibly, defined normally. Backup it.
         @TOPLEVEL_ALIAS_TABLE[current][sym] = cur_alias
       end
     else

ext/tk/lib/tk/font.rb

@@ -1787,7 +1787,7 @@ module TkFont::CoreMethods
       tk_call('font', 'configure', font,
               "-#{slot}", value, '-pointadjust', padjust)
     elsif JAPANIZED_TK && (slot == 'family' || slot == :family)
-      # coumpund font?
+      # compound font?
       begin
         compound = tk_split_simplelist(tk_call('font', 'configure',
                                                font, '-compound'))

ext/tk/lib/tk/menu.rb

@@ -525,7 +525,7 @@ Tk.__set_loaded_toplevel_aliases__('tk/menu.rb', :Tk, Tk::SysMenu_System,
 
 
 class Tk::SysMenu_Apple<Tk::Menu
-  # for Machintosh
+  # for Macintosh
   include Tk::SystemMenu
   SYSMENU_NAME = 'apple'
 end

ext/tk/lib/tk/menubar.rb

@@ -80,7 +80,7 @@
 #                        'font'=>'Helvetia 12 bold')
 # menubar.pack('side'=>'top', 'fill'=>'x')
 
-# See tk/menuspce.rb about the format of the menu_spec
+# See tk/menuspec.rb about the format of the menu_spec
 
 # To use add_menu, configuration must be done by calling configure after
 # adding all menus by add_menu, not by the constructor arguments.

ext/tk/lib/tk/menuspec.rb

@@ -1,7 +1,7 @@
 # frozen_string_literal: false
 #
 # tk/menuspec.rb
-#                              Hidethoshi NAGAI (nagai@ai.kyutech.ac.jp)
+#                              Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
 #
 # based on tkmenubar.rb :
 #   Copyright (C) 1998 maeda shugo. All rights reserved.
@@ -30,7 +30,7 @@
 #   [ entry_info, entry_info, ... ]
 #
 #
-# underline, accelerator, and configs are optional pearameters.
+# underline, accelerator, and configs are optional parameters.
 # Hashes are OK instead of Arrays. Then the entry type ('command',
 # 'checkbutton', 'radiobutton' or 'cascade') is given by 'type' key
 # (e.g. :type=>'cascade'). When type is 'cascade', an array of menu_info

ext/tk/lib/tk/optiondb.rb

@@ -59,7 +59,7 @@ module TkOptionDB
         when /\\$/    # continue
           cline.chop!
           next
-        when /^\s*(!|#)/     # coment
+        when /^\s*(!|#)/     # comment
           cline = ''
           next
         when /^([^:]+):(.*)$/
@@ -103,7 +103,7 @@ module TkOptionDB
         when /\\$/    # continue
           cline.chop!
           next
-        when /^\s*!/     # coment
+        when /^\s*!/     # comment
           cline = ''
           next
         when /^([^:]+):\s(.*)$/
@@ -341,7 +341,7 @@ module TkOptionDB
   # define new proc class :
   # If you want to modify the new class or create a new subclass,
   # you must do such operation in the block parameter.
-  # Because the created class is flozen after evaluating the block.
+  # Because the created class is frozen after evaluating the block.
   def new_proc_class(klass, func, safe = 4, add = false, parent = nil, &b)
     new_klass = __create_new_class(klass, func, safe, add, parent)
     new_klass.class_eval(&b) if block_given?

ext/tk/lib/tk/root.rb

@@ -32,7 +32,7 @@ class Tk::Root<TkWindow
       }
     }
 
-    if keys  # wm commands ( for backward comaptibility )
+    if keys  # wm commands ( for backward compatibility )
       keys.each{|k,v|
         if v.kind_of? Array
           root.__send__(k,*v)

ext/tk/lib/tk/text.rb

@@ -1463,7 +1463,7 @@ class Tk::Text<TkTextWin
           val, i = _retrieve_braced_text(str, i)
           result.push val
         else
-          # text which may contain backslahes
+          # text which may contain backslashes
           val, i = _retrieve_backslashed_text(str, i)
           result.push val
         end

ext/tk/lib/tk/timer.rb

@@ -182,7 +182,7 @@ class TkTimer
 
     @cancel_on_exception = DEFAULT_IGNORE_EXCEPTIONS
     # Unless @cancel_on_exception, Ruby/Tk shows an error dialog box when
-    # an excepsion is raised on TkTimer callback procedure.
+    # an exception is raised on TkTimer callback procedure.
     # If @cancel_on_exception is an array of exception classes and the raised
     # exception is included in the array, Ruby/Tk cancels executing TkTimer
     # callback procedures silently (TkTimer#cancel is called and no dialog is

ext/tk/lib/tk/txtwin_abst.rb

@@ -1,6 +1,6 @@
 # frozen_string_literal: false
 #
-# tk/txtwin_abst.rb : TkTextWin abstruct class
+# tk/txtwin_abst.rb : TkTextWin abstract class
 #
 require 'tk'
 

ext/tk/lib/tk/wm.rb

@@ -311,7 +311,7 @@ module Tk
       # --------------------------------------------------------------
       # In the future release, I want to support to embed the 'win'
       # into the container which has window-id 'use-id'.
-      # It may give users frexibility on controlling their GUI.
+      # It may give users flexibility on controlling their GUI.
       # However, it may be difficult for current Tcl/Tk (Tcl/Tk8.5.1),
       # because it seems to require to modify Tcl/Tk's source code.
       # --------------------------------------------------------------

ext/tk/lib/tk/xim.rb

@@ -1,6 +1,6 @@
 # frozen_string_literal: false
 #
-# tk/xim.rb : control imput_method
+# tk/xim.rb : control input_method
 #
 require 'tk'
 

ext/tk/lib/tkextlib/bwidget/listbox.rb

@@ -31,7 +31,7 @@ class Tk::BWidget::ListBox
   class Event_for_Items < TkEvent::Event
     def self._get_extra_args_tbl
       [
-        TkComm.method(:string)   # item idenfier
+        TkComm.method(:string)   # item identifier
       ]
     end
   end

ext/tk/lib/tkextlib/bwidget/notebook.rb

@@ -25,7 +25,7 @@ class Tk::BWidget::NoteBook
   class Event_for_Tabs < TkEvent::Event
     def self._get_extra_args_tbl
       [
-        TkComm.method(:string)   # page idenfier
+        TkComm.method(:string)   # page identifier
       ]
     end
   end

ext/tk/lib/tkextlib/bwidget/tree.rb

@@ -28,7 +28,7 @@ class Tk::BWidget::Tree
   class Event_for_Items < TkEvent::Event
     def self._get_extra_args_tbl
       [
-        TkComm.method(:string)   # item idenfier
+        TkComm.method(:string)   # item identifier
       ]
     end
   end

ext/tk/lib/tkextlib/iwidgets/shell.rb

@@ -20,7 +20,7 @@ class Tk::Iwidgets::Shell
   WidgetClassNames[WidgetClassName] ||= self
 
   def activate
-    tk_call(@path, 'activate')  # may return val of deactibate method
+    tk_call(@path, 'activate')  # may return val of deactivate method
   end
 
   def center(win=None)

ext/tk/lib/tkextlib/tcllib/tablelist_tile.rb

@@ -1,6 +1,6 @@
 # frozen_string_literal: false
 #
-#  tkextlib/tcllib/tablelist_tlie.rb
+#  tkextlib/tcllib/tablelist_tile.rb
 #                               by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
 #
 #   * Part of tcllib extension

ext/tk/lib/tkextlib/tile.rb

@@ -1,6 +1,6 @@
 # frozen_string_literal: false
 #
-#  Tile theme engin (tile widget set) support
+#  Tile theme engine (tile widget set) support
 #                               by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
 #
 
@@ -133,14 +133,14 @@ module Tk
 
     def self.__define_LoadImages_proc_for_compatibility__!
       # Ttk 8.5 (Tile 0.8) lost 'LoadImages' utility procedure.
-      # So, some old scripts doen't work, because those scripts use the
+      # So, some old scripts don't work, because those scripts use the
       # procedure to define local styles.
       # Of course, rewriting such Tcl/Tk scripts isn't difficult for
       # Tcl/Tk users. However, it may be troublesome for Ruby/Tk users
       # who use such Tcl/Tk scripts as it is.
       # This method may help Ruby/Tk users who don't want to modify old
       # Tcl/Tk scripts for the latest version of Ttk (Tile) extension.
-      # This method defines a comaptible 'LoadImages' procedure on the
+      # This method defines a compatible 'LoadImages' procedure on the
       # Tcl/Tk interpreter working under Ruby/Tk.
       # Please give attention to use this method. It may conflict with
       # some definitions on Tcl/Tk scripts.

ext/tk/sample/demos-en/image3.rb

@@ -32,7 +32,7 @@ end
 
 # selectAndLoadDir3 --
 # This procedure pops up a dialog to ask for a directory to load into
-# the listobx and (if the user presses OK) reloads the directory
+# the listbox and (if the user presses OK) reloads the directory
 # listbox from the directory named in the demo's entry.
 #
 # Arguments:

ext/tk/sample/demos-en/toolbar.rb

@@ -43,7 +43,7 @@ EOL
 end
 
 ## Set up the toolbar hull
-tbar_base = Tk::Frame.new(base_frame, # Must be a starndard Tk frame!
+tbar_base = Tk::Frame.new(base_frame, # Must be a standard Tk frame!
                           :widgetname=>'toolbar') # for window title
 sep = Ttk::Separator.new(base_frame)
 to_base = Ttk::Frame.new(tbar_base, :cursor=>'fleur')

ext/tk/sample/demos-en/ttknote.rb

@@ -43,7 +43,7 @@ notebook = Ttk::Notebook.new(base_frame).pack(:fill=>:both, :expand=>true,
                                               :padx=>2, :pady=>3)
 notebook.enable_traversal
 
-## Popuplate the first pane
+## Populate the first pane
 f_msg = Ttk::Frame.new(notebook)
 msg_m = Ttk::Label.new(f_msg, :font=>$font, :wraplength=>'4i',
                        :justify=>:left, :anchor=>'n', :text=><<EOL)
@@ -77,7 +77,7 @@ f_msg.grid_columnconfigure([0, 1], :weight=>1, :uniform=>1)
 f_disabled = Ttk::Frame.new(notebook)
 notebook.add(f_disabled, :text=>'Disabled', :state=>:disabled)
 
-## Popuplate the third pane
+## Populate the third pane
 f_editor = Ttk::Frame.new(notebook)
 notebook.add(f_editor, :text=>'Text Editor', :underline=>0)
 editor_t = Tk::Text.new(f_editor, :width=>40, :height=>10, :wrap=>:char)

ext/tk/sample/demos-jp/image3.rb

@@ -33,7 +33,7 @@ end
 
 # selectAndLoadDir3 --
 # This procedure pops up a dialog to ask for a directory to load into
-# the listobx and (if the user presses OK) reloads the directory
+# the listbox and (if the user presses OK) reloads the directory
 # listbox from the directory named in the demo's entry.
 #
 # Arguments:

ext/tk/sample/demos-jp/ttknote.rb

@@ -45,7 +45,7 @@ notebook = Ttk::Notebook.new(base_frame).pack(:fill=>:both, :expand=>true,
                                               :padx=>2, :pady=>3)
 notebook.enable_traversal
 
-## Popuplate the first pane
+## Populate the first pane
 f_msg = Ttk::Frame.new(notebook)
 msg_m = Ttk::Label.new(f_msg, :font=>$font, :wraplength=>'5i',
                        :justify=>:left, :anchor=>'n', :text=><<EOL)
@@ -85,7 +85,7 @@ f_msg.grid_columnconfigure([0, 1], :weight=>1, :uniform=>1)
 f_disabled = Ttk::Frame.new(notebook)
 notebook.add(f_disabled, :text=>'無効化されたタブ', :state=>:disabled)
 
-## Popuplate the third pane
+## Populate the third pane
 f_editor = Ttk::Frame.new(notebook)
 notebook.add(f_editor, :text=>'テキストエディタ(Text Editor)', :underline=>9)
 editor_t = Tk::Text.new(f_editor, :width=>40, :height=>10, :wrap=>:char)

ext/tk/sample/editable_listbox.rb

@@ -2,7 +2,7 @@
 #
 # Tk::RbWidget::Editable_Listbox class
 #
-#   When "DoubleClick-1" on a listbox item, the entry box is opend on the
+#   When "DoubleClick-1" on a listbox item, the entry box is opened on the
 #   item. And when hit "Return" key on the entry box after modifying the
 #   text, the entry box is closed and the item is changed. Or when hit
 #   "Escape" key, the entry box is closed without modification.

ext/tk/sample/menubar3.rb

@@ -8,7 +8,7 @@ require 'tk'
 radio_var = TkVariable.new('y')
 
 menu_spec = [
-  [['&File', true], # when underline option is ture, '&' index is the position
+  [['&File', true], # when underline option is true, '&' index is the position
     {:label=>'Open', :command=>proc{puts('Open clicked')}, :underline=>0},
     '---',
     ['Check_A', TkVariable.new(true), 6],

ext/tk/sample/scrollframe.rb

@@ -7,8 +7,8 @@
 #    When it is configured, scrollregion of the container is changed.
 #
 #    Scrollbars can be toggled by Tk::RbWidget::ScrollFrame#vscroll & hscroll.
-#    If horizontal or virtical scrollbar is turned off, the horizontal
+#    If horizontal or vertical scrollbar is turned off, the horizontal
-#    or virtical size of embedded widgets is propagated.
+#    or vertical size of embedded widgets is propagated.
 #
 #                         Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
 #
@@ -34,7 +34,7 @@ class Tk::RbWidget::ScrollFrame < TkFrame
                            :borderwidth=>0, :selectborderwidth=>0,
                            :highlightthickness=>0)
 
-    # allignment
+    # alignment
     TkGrid.rowconfigure(@frame, 0, 'weight'=>1, 'minsize'=>0)
     TkGrid.columnconfigure(@frame, 0, 'weight'=>1, 'minsize'=>0)
     @canvas.grid('row'=>0, 'column'=>0, 'sticky'=>'news')

ext/tk/sample/tkballoonhelp.rb

@@ -4,7 +4,7 @@
 #                       by Hidetoshi NAGAI (nagai@ai.kyutech.ac.jp)
 #
 # Add a balloon help to a widget.
-# This widget has only poor featureas. If you need more useful features,
+# This widget has only poor features. If you need more useful features,
 # please try to use the Tix extension of Tcl/Tk under Ruby/Tk.
 #
 # The interval time to display a balloon help is defined 'interval' option
@@ -157,7 +157,7 @@ if __FILE__ == $0
   sb = TkScrollbox.new.pack(:fill=>:x)
   sb.insert(:end, *%w(aaa bbb ccc ddd eee fff ggg hhh iii jjj kkk lll mmm))
 =begin
-  # CASE1 : command takes no arguemnt
+  # CASE1 : command takes no argument
   bh = Tk::RbWidget::BalloonHelp.new(sb, :interval=>500,
                            :relief=>:ridge, :background=>'white',
                            :command=>proc{
@@ -166,7 +166,7 @@ if __FILE__ == $0
                            })
 =end
 =begin
-  # CASE2 : command takes 2 arguemnts
+  # CASE2 : command takes 2 arguments
   bh = Tk::RbWidget::BalloonHelp.new(sb, :interval=>500,
                            :relief=>:ridge, :background=>'white',
                            :command=>proc{|x, y|
@@ -174,7 +174,7 @@ if __FILE__ == $0
                            })
 =end
 =begin
-  # CASE3 : command takes 3 arguemnts
+  # CASE3 : command takes 3 arguments
   Tk::RbWidget::BalloonHelp.new(sb, :interval=>500,
                       :relief=>:ridge, :background=>'white',
                       :command=>proc{|x, y, bhelp|
@@ -182,7 +182,7 @@ if __FILE__ == $0
                       })
 =end
 =begin
-  # CASE4a : command is a Proc object and takes 4 arguemnts
+  # CASE4a : command is a Proc object and takes 4 arguments
   cmd = proc{|x, y, bhelp, parent|
     bhelp.text "current index == #{parent.nearest(y)}"
   }
@@ -199,7 +199,7 @@ if __FILE__ == $0
                       :command=>cmd)
 =end
 #=begin
-  # CASE4b : command is a Method object and takes 4 arguemnts
+  # CASE4b : command is a Method object and takes 4 arguments
   def set_msg(x, y, bhelp, parent)
     bhelp.text "current index == #{parent.nearest(y)}"
   end

ext/tk/sample/tkextlib/bwidget/demo.rb

@@ -87,7 +87,7 @@ class BWidget_Demo
                                 :progressvar=>DemoVar.prgindic
                         )
 
-    # toobar 1 creation
+    # toolbar 1 creation
     DemoVar.prgindic.numeric += 1
 
     DemoVar.mainframe.add_toolbar{|tb1|

ext/tk/sample/tkextlib/iwidgets/sample/entryfield-1.rb

@@ -2,7 +2,7 @@
 # frozen_string_literal: false
 #########################################################
 #
-#  use Tk::UTF8_String() for a utf8 charecter
+#  use Tk::UTF8_String() for a utf8 character
 #
 #########################################################
 require 'tk'

ext/tk/sample/tkextlib/iwidgets/sample/entryfield-2.rb

@@ -2,7 +2,7 @@
 # frozen_string_literal: false
 #########################################################
 #
-#  set $KCODE to 'utf' for a utf8 charecter
+#  set $KCODE to 'utf' for a utf8 character
 #
 #########################################################
 unless defined?(::Encoding.default_external)

ext/tk/sample/tkextlib/iwidgets/sample/entryfield-3.rb

@@ -2,7 +2,7 @@
 # frozen_string_literal: false
 #########################################################
 #
-#  set Tk.encoding = 'utf-8' for a utf8 charecter
+#  set Tk.encoding = 'utf-8' for a utf8 character
 #
 #########################################################
 require 'tk'

ext/tk/sample/tkextlib/tkHTML/hv.rb

@@ -302,7 +302,7 @@ show_tbl.trace('w', proc{
 
 show_img.trace('w', refresh)
 
-# If an arguent was specified, read it into the HTML widget.
+# If an argument was specified, read it into the HTML widget.
 #
 Tk.update
 if file && file != ""

ext/tk/sample/tkextlib/tkHTML/ss.rb

@@ -114,7 +114,7 @@ EOD
 
     @html.clipwin.focus
 
-    # If an arguent was specified, read it into the HTML widget.
+    # If an argument was specified, read it into the HTML widget.
     #
     Tk.update
     if file && file != ""

ext/tk/sample/tkextlib/tktable/buttons.rb

@@ -62,7 +62,7 @@ table.bind('1', proc{|w, x, y|
              end}, '%W %x %y')
 
 
-# inititialize the array, titles, and celltags
+# initialize the array, titles, and celltags
 0.step(rows){|i|
   tab[i,-1] = i
   0.step(cols){|j|

ext/tk/sample/tkextlib/vu/README.txt

@@ -31,7 +31,7 @@ m128_000.xbm
 
 oscilloscope.tcl
 	the heart of a Realtime Oscilloscope,where the PC´s joystick
-	port gives 4 digtal inputs and 4 analog 8 bit values with an
+	port gives 4 digital inputs and 4 analog 8 bit values with an
 	resolution of ~1 millisecond (!!!)  running Realtime Linux.
 	<p> creates DEMO.ps
 

ext/tk/sample/tkmulticolumnlist.rb

@@ -54,7 +54,7 @@ class TkMultiColumnList < TkText
     @mode = :title
     @command = nil
 
-    # virtical scrollbar
+    # vertical scrollbar
     @v_scroll = TkYScrollbar.new(@frame, 'highlightthickness'=>@h_l_thick,
                                  'borderwidth'=>@scrbar_border,
                                  'width'=>@scrbar_width)
@@ -197,10 +197,10 @@ class TkMultiColumnList < TkText
     @f_lbox.height lbox_height
     @f_hscr.height hscr_height
 
-    # set control procedure for virtical scroll
+    # set control procedure for vertical scroll
     @v_scroll.assign(*@lbox_list)
 
-    # set control procedure for horizoncal scroll
+    # set control procedure for horizontal scroll
     @h_scroll.assign(@c_title, @c_lbox, @c_hscr)
 
     # binding for listboxes

ext/tk/sample/tkmultilistbox.rb

@@ -21,7 +21,7 @@ class TkMultiListbox < TkListbox
     @width_total = 0
     title_info.each{|title, width| @width_total += width.to_f}
 
-    # virtical scrollbar
+    # vertical scrollbar
     @v_scroll = TkScrollbar.new(@frame, 'orient'=>'vertical')
 
     # init arrays
@@ -42,7 +42,7 @@ class TkMultiListbox < TkListbox
                            'height'=>@v_scroll.cget('width') +
                                      2 * @v_scroll.cget('borderwidth'))
 
-    # dummy label to keep the hight of title space
+    # dummy label to keep the height of title space
     TkLabel.new(@f_title, 'text'=>' ').pack
 
     # create each listbox
@@ -104,7 +104,7 @@ class TkMultiListbox < TkListbox
       tab.bind('B1-Motion', proc{|x, idx| resize(x, idx.to_i)}, "%X #{idx}")
     }
 
-    # set control procedure for virtical scroll
+    # set control procedure for vertical scroll
     @lbox_list.each{|lbox|
       lbox.yscrollcommand proc{|first, last|
         @v_scroll.set first, last

ext/tk/sample/tkmultilistframe.rb

@@ -53,7 +53,7 @@ class TkMultiListFrame < TkListbox
     # init status
     @mode = :title
 
-    # virtical scrollbar
+    # vertical scrollbar
 =begin
     @v_scroll = TkScrollbar.new(@frame, 'highlightthickness'=>@h_l_thick,
                                 'borderwidth'=>@scrbar_border,
@@ -185,7 +185,7 @@ class TkMultiListFrame < TkListbox
     @f_lbox.height lbox_height
     @f_hscr.height hscr_height
 
-    # set control procedure for virtical scroll
+    # set control procedure for vertical scroll
 =begin
     @lbox_list.each{|lbox|
       lbox.yscrollcommand proc{|first, last|
@@ -196,7 +196,7 @@ class TkMultiListFrame < TkListbox
 =end
     @v_scroll.assign(*@lbox_list)
 
-    # set control procedure for horizoncal scroll
+    # set control procedure for horizontal scroll
 =begin
     @c_title.xscrollcommand proc{|first, last|
       @h_scroll.set first, last

ext/tk/sample/tktextframe.rb

@@ -76,7 +76,7 @@ module Tk::ScrollbarComposite
     @component.xscrollbar(@h_scroll)
     @component.yscrollbar(@v_scroll)
 
-    # allignment
+    # alignment
     TkGrid.rowconfigure(@frame, 0, 'weight'=>1, 'minsize'=>0)
     TkGrid.columnconfigure(@frame, 0, 'weight'=>1, 'minsize'=>0)
     @component.grid('row'=>0, 'column'=>0, 'sticky'=>'news')
@@ -156,7 +156,7 @@ class TkTextFrame < TkText
        :textrelief
     )
 
-    # return the created componet
+    # return the created component
     @text
   end
   private :create_component

ext/tk/sample/tktextio.rb

@@ -8,7 +8,7 @@
 #        So, for example, TkTextIO#getc returns a character, TkTextIO#pos
 #        means the character position, TkTextIO#read(size) counts by
 #        characters, and so on.
-#        Of course, it is available to make TkTextIO class to suuport
+#        Of course, it is available to make TkTextIO class to support
 #        'byte' access. However, it may break multi-byte characters.
 #        and then, displayed string on the text widget may be garbled.
 #        I think that it is not good on the supposed situation of using

ext/tk/sample/ttk_wrapper.rb

@@ -121,7 +121,7 @@ Tk::Tile.set_theme(OPTS[:theme]) if OPTS[:theme]
 
 
 ##########################################################################
-#  replace $0 and $RPAGRAM_NAME
+#  replace $0 and $PROGRAM_NAME
 ##########################################################################
 #  When the expand_path of the target script is long, ruby sometimes
 #  fails to set the path to $0 (the path string is trimmed).

ext/tk/tcltklib.c

@@ -3814,7 +3814,7 @@ ip_RubyExitCommand(clientData, interp, argc, argv)
         return TCL_RETURN;
 
     default:
-        /* arguemnt error */
+        /* argument error */
         Tcl_AppendResult(interp,
                          "wrong number of arguments: should be \"",
                          cmd, " ?returnCode?\"", (char *)NULL);