lib/rouge/lexers/perl.rb in rouge-1.1.0 vs lib/rouge/lexers/perl.rb in rouge-1.2.0

@@ -65,13 +65,11 @@
         rule /#.*?$/, Comment::Single
         rule /^=[a-zA-Z0-9]+\s+.*?\n=cut/, Comment::Multiline
         rule /(?:#{keywords.join('|')})\b/, Keyword
 
         rule /(format)(\s+)([a-zA-Z0-9_]+)(\s*)(=)(\s*\n)/ do
-          group Keyword; group Text
-          group Name; group Text
-          group Punctuation; group Text
+          groups Keyword, Text, Name, Text, Punctuation, Text
 
           push :format
         end
 
         rule /(?:eq|lt|gt|le|ge|ne|not|and|or|cmp)\b/, Operator::Word
@@ -164,11 +162,10 @@
         rule /[a-zA-Z_]\w*[!?]?/, Name::Function
         rule /\s+/, Text
 
         # argument declaration
         rule /(\([$@%]*\))(\s*)/ do
-          group Punctuation
-          group Text
+          groups Punctuation, Text
         end
 
         rule /.*?{/, Punctuation, :pop!
         rule /;/, Punctuation, :pop!
       end