]> git.vpit.fr Git - perl/modules/LaTeX-TikZ.git/commitdiff
In LaTeX::TikZ::Functor, move ->default_rule after ->new
authorVincent Pit <vince@profvince.com>
Sun, 1 Aug 2010 16:14:00 +0000 (18:14 +0200)
committerVincent Pit <vince@profvince.com>
Sun, 1 Aug 2010 16:14:00 +0000 (18:14 +0200)
lib/LaTeX/TikZ/Functor.pm

index 7e64142f1402b9d5a3b7cc13df143fe8f313deb5..1f4b4815ec2ba4bd50d8a06540257d6bc3d7e5d4 100644 (file)
@@ -122,29 +122,6 @@ BEGIN {
 
 =head1 METHODS
 
-=head2 C<< default_rule $spec => $handler >>
-
-Adds to all subsequently created functors a default rule for the class or role C<$spec>.
-
-An exception is thrown if there is already a default rule for C<$spec> ; otherwise, the new rule is appended to the current list of rules.
-But if C<$spec> begins with C<'+'>, the rule will replace I<all> default rules that apply to subclasses or subroles of C<$spec> (including C<$spec> itself).
-
-Returns true if and only if an existent rule was replaced.
-
-=cut
-
-sub default_rule {
- shift;
-
- my $rule = $validate_rule->(@_);
-
- $insert_rule->(
-  $rule,
-  $rule->[4] ? \@default_set_rules : \@default_mod_rules,
-  0,
- );
-}
-
 =head2 C<< new rules => [ $spec1 => $handler1, $spec2 => $handler2, ... ] >>
 
 Creates a new functor object that will use both the default and these user-specified rules.
@@ -260,6 +237,29 @@ LaTeX::TikZ::Interface->register(
  },
 );
 
+=head2 C<< default_rule $spec => $handler >>
+
+Adds to all subsequently created functors a default rule for the class or role C<$spec>.
+
+An exception is thrown if there is already a default rule for C<$spec> ; otherwise, the new rule is appended to the current list of rules.
+But if C<$spec> begins with C<'+'>, the rule will replace I<all> default rules that apply to subclasses or subroles of C<$spec> (including C<$spec> itself).
+
+Returns true if and only if an existent rule was replaced.
+
+=cut
+
+sub default_rule {
+ shift;
+
+ my $rule = $validate_rule->(@_);
+
+ $insert_rule->(
+  $rule,
+  $rule->[4] ? \@default_set_rules : \@default_mod_rules,
+  0,
+ );
+}
+
 =head1 SEE ALSO
 
 L<LaTeX::TikZ>.