diff options
author | tadf <tadf@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-06-22 15:26:58 +0000 |
---|---|---|
committer | tadf <tadf@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-06-22 15:26:58 +0000 |
commit | 0e866a2e516d5b7bea0a602d1048b5bdc22a2f98 (patch) | |
tree | 09eedee80d964377eaec8582e67e7450efac66bd /sample/cal.rb | |
parent | 47993929c4727ec1e7e7af4b2d2177d0058b84f8 (diff) |
updated to the new version (based on date2 3.3).
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2589 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'sample/cal.rb')
-rw-r--r-- | sample/cal.rb | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/sample/cal.rb b/sample/cal.rb index 92f43e2a72..0b2d9216ac 100644 --- a/sample/cal.rb +++ b/sample/cal.rb @@ -1,7 +1,7 @@ #! /usr/bin/env ruby # cal.rb: Written by Tadayoshi Funaba 1998-2002 -# $Id: cal.rb,v 2.3 2002-05-14 07:43:39+09 tadf Exp $ +# $Id: cal.rb,v 2.4 2002-06-08 00:40:29+09 tadf Exp $ require 'date' require 'getopts' @@ -37,7 +37,7 @@ def usage end def pict(y, m, sg) - d = (1..31).detect{|d| Date.exist?(y, m, d, sg)} + d = (1..31).detect{|d| Date.valid_date?(y, m, d, sg)} fi = Date.new(y, m, d, sg) fi -= (fi.jd - $k + 1) % 7 @@ -93,7 +93,7 @@ m ||= to.mon usage unless m >= 1 and m <= 12 usage unless y >= -4712 -usage unless sg = $tab[$OPT_c] +usage if (sg = $tab[$OPT_c]).nil? $dw = if $OPT_j then 3 else 2 end $mw = ($dw + 1) * 7 - 1 @@ -103,9 +103,9 @@ $tw = ($mw + 2) * $mn - 2 $k = if $OPT_m then 1 else 0 end $da = if $OPT_j then :yday else :mday end -print (if not $OPT_y - unlines(pict(y, m, sg)) - else - y.to_s.center($tw) + "\n\n" + - unlines(block((1..12).collect{|m| pict(y, m, sg)}, $mn)) + "\n" - end) +print(if not $OPT_y + unlines(pict(y, m, sg)) + else + y.to_s.center($tw) + "\n\n" + + unlines(block((1..12).collect{|m| pict(y, m, sg)}, $mn)) + "\n" + end) |