diff options
author | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-10-11 04:51:21 +0000 |
---|---|---|
committer | nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-10-11 04:51:21 +0000 |
commit | 3514110b89bee5c37e308b4ca887e66dfe841456 (patch) | |
tree | d280d8542cc44d1cd1a75e8ec87b1f9d231561b7 /ext/tk/sample/tkfrom.rb | |
parent | 05f5928c9d0f094d1e7e21a9bd9d8a8fc2f1a805 (diff) | |
download | ruby-3514110b89bee5c37e308b4ca887e66dfe841456.tar.gz |
* ext/tk/lib/tk/*: untabify
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@7029 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/sample/tkfrom.rb')
-rw-r--r-- | ext/tk/sample/tkfrom.rb | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/ext/tk/sample/tkfrom.rb b/ext/tk/sample/tkfrom.rb index 25f1d7c429..2cece7337e 100644 --- a/ext/tk/sample/tkfrom.rb +++ b/ext/tk/sample/tkfrom.rb @@ -22,13 +22,13 @@ class Mail @body = [] while line = f.gets() $_.chop! - next if /^From / =~ line # skip From-line - break if /^$/ =~ line # end of header + next if /^From / =~ line # skip From-line + break if /^$/ =~ line # end of header if /^(\S+):\s*(.*)/ =~ line - @header[attr = $1.capitalize] = $2 + @header[attr = $1.capitalize] = $2 elsif attr - sub(/^\s*/, '') - @header[attr] += "\n" + $_ + sub(/^\s*/, '') + @header[attr] += "\n" + $_ end end @@ -65,7 +65,7 @@ list = scroll = nil TkFrame.new{|f| list = TkListbox.new(f) { yscroll proc{|*idx| - scroll.set *idx + scroll.set *idx } relief 'raised' # geometry "80x5" |