[BioRuby-cvs] bioruby/test/unit/bio/shell/plugin test_seq.rb, 1.4, 1.5

[Katayama Toshiaki]

Update of /home/repository/bioruby/bioruby/test/unit/bio/shell/plugin
In directory pub.open-bio.org:/tmp/cvs-serv31926/test/unit/bio/shell/plugin

Modified Files:
	test_seq.rb 
Log Message:
* modified to supress puts during tests


Index: test_seq.rb
===================================================================
RCS file: /home/repository/bioruby/bioruby/test/unit/bio/shell/plugin/test_seq.rb,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** test_seq.rb	18 Dec 2005 16:28:46 -0000	1.4
--- test_seq.rb	19 Dec 2005 02:44:03 -0000	1.5
***************
*** 100,104 ****
  //
  END
!       assert_equal(output, seqstat(naseq))
      end
  
--- 100,114 ----
  //
  END
!       $str = ''
!       alias puts_orig puts
!       def puts(*args)
!         args.each do |obj|
!           $str << obj.to_s
!         end
!       end
!       seqstat(naseq)
!       undef puts
!       alias puts puts_orig
!       assert_equal(output, $str)
      end
  
***************
*** 116,120 ****
  //
  END
!       assert_equal(output, seqstat(aaseq))
      end
  
--- 126,140 ----
  //
  END
!       $str = ''
!       alias puts_orig puts
!       def puts(*args)
!         args.each do |obj|
!           $str << obj.to_s
!         end
!       end
!       seqstat(aaseq)
!       undef puts
!       alias puts puts_orig
!       assert_equal(output, $str)
      end
  
***************
*** 139,147 ****
       at
  END
!       $doublehelix = ''
        alias puts_orig puts
        def puts(*args)
          args.each do |obj|
!           $doublehelix << obj.to_s
          end
        end
--- 159,167 ----
       at
  END
!       $str = ''
        alias puts_orig puts
        def puts(*args)
          args.each do |obj|
!           $str << obj.to_s
          end
        end
***************
*** 149,153 ****
        undef puts
        alias puts puts_orig
!       assert_equal(output, $doublehelix)
      end
  
--- 169,173 ----
        undef puts
        alias puts puts_orig
!       assert_equal(output, $str)
      end