diff options
Diffstat (limited to 'ext/tk/sample/tkfrom.rb')
-rw-r--r-- | ext/tk/sample/tkfrom.rb | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/ext/tk/sample/tkfrom.rb b/ext/tk/sample/tkfrom.rb index ba0e547799..8c3efb8137 100644 --- a/ext/tk/sample/tkfrom.rb +++ b/ext/tk/sample/tkfrom.rb @@ -20,11 +20,11 @@ class Mail def initialize(f) @header = {} @body = [] - while f.gets() + while line = f.gets() $_.chop! - next if /^From / # skip From-line - break if /^$/ # end of header - if /^(\S+):\s*(.*)/ + next if /^From / =~ line # skip From-line + break if /^$/ =~ line # end of header + if /^(\S+):\s*(.*)/ =~ line @header[attr = $1.capitalize] = $2 elsif attr sub(/^\s*/, '') @@ -32,10 +32,10 @@ class Mail end end - return if ! $_ + return unless $_ - while f.gets() - break if /^From / + while line = f.gets() + break if /^From / =~ line @body.push($_) end end |