From 5ad1f1d3cd1de616456fd31ba895cef729e1f242 Mon Sep 17 00:00:00 2001 From: nobu Date: Sun, 21 Dec 2008 03:23:19 +0000 Subject: * lib/optparse.rb (SPLAT_PROC): fix for regexp. [ruby-dev:37514] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@20895 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- test/optparse/test_reqarg.rb | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'test/optparse') diff --git a/test/optparse/test_reqarg.rb b/test/optparse/test_reqarg.rb index 4ce9dd6292..579794695a 100644 --- a/test/optparse/test_reqarg.rb +++ b/test/optparse/test_reqarg.rb @@ -60,4 +60,16 @@ module TestOptionParser::ReqArg assert_equal(%w"", no_error {@opt.parse!(%w"--opt=foo")}) assert_equal("foo", @flag) end + + class TestOptionParser::WithPattern < TestOptionParser + def test_pattern + pat = num = nil + @opt.def_option("--pattern=VAL", /(\w+)(?:\s*:\s*(\w+))?/) {|x, y, z| pat = [x, y, z]} + @opt.def_option("-T NUM", /\A[1-4]\z/) {|n| num = n} + no_error {@opt.parse!(%w"--pattern=key:val")} + assert_equal(%w"key:val key val", pat, '[ruby-list:45645]') + no_error {@opt.parse!(%w"-T 4")} + assert_equal("4", num, '[ruby-dev:37514]') + end + end end -- cgit v1.2.3