summaryrefslogtreecommitdiff
path: root/ext/tk/sample/tkfrom.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ext/tk/sample/tkfrom.rb')
-rw-r--r--ext/tk/sample/tkfrom.rb12
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"