lib/bio/appl/clustalw/report.rb in bio-1.4.3.0001 vs lib/bio/appl/clustalw/report.rb in bio-1.5.0
- old
+ new
@@ -141,10 +141,12 @@
@match_line = ''
if a.size > 0 then
a[0].gsub!(/\A(\r?\n)+/, '')
a.collect! { |x| x.split(/\r?\n/) }
a.each { |x|
- x.each { |y| y.sub!(/ +\d+\s*$/, '') }} #for -SEQNOS=on option
+ x.each { |y| y.sub!(/ +\d+\s*\z/, '') if /\d\s*\z/ =~ y }
+ # The above "if /\d\s*\z/ =~ y" is for optimization only.
+ } #for -SEQNOS=on option
@tagsize = ( a[0][0].rindex(/\s/) or -1 ) + 1
a.each do |x|
@match_line << x.pop.to_s[@tagsize..-1]
end
a[0].each do |y|