diff options
Diffstat (limited to 'library/word.tcl')
-rw-r--r-- | library/word.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/library/word.tcl b/library/word.tcl index 828f13a..0c8e01c 100644 --- a/library/word.tcl +++ b/library/word.tcl @@ -5,7 +5,7 @@ # properly for different platforms. # # Copyright (c) 1996 Sun Microsystems, Inc. -# Copyright (c) 1998 Scritpics Corporation. +# Copyright (c) 1998 Scriptics Corporation. # # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. @@ -14,7 +14,7 @@ # interpreted as white space. if {$::tcl_platform(platform) eq "windows"} { - # Windows style - any but a unicode space char + # Windows style - any but a Unicode space char if {![info exists ::tcl_wordchars]} { set ::tcl_wordchars {\S} } @@ -22,7 +22,7 @@ if {$::tcl_platform(platform) eq "windows"} { set ::tcl_nonwordchars {\s} } } else { - # Motif style - any unicode word char (number, letter, or underscore) + # Motif style - any Unicode word char (number, letter, or underscore) if {![info exists ::tcl_wordchars]} { set ::tcl_wordchars {\w} } |