Item14237: Added inject() method

Inserts new spec items at current position. Prepared for -expandable
support.

core/lib/Foswiki/Config/SpecDef.pm

@@ -179,6 +179,7 @@ sub hasNext {
 
 Returns undef if element is ok to be used as a subspec. Otherwise returns
 error text about elem type suitable to be used in a error message.
+
 =cut
 
 sub badSubSpecElem {
@@ -230,6 +231,18 @@ sub subSpecs {
     return $subSpecs;
 }
 
+sub inject {
+    my $this   = shift;
+    my %params = @_;
+
+    return undef
+      unless defined $params{specDef} && ref( $params{specDef} ) eq 'ARRAY';
+
+    splice( @{ $this->specDef }, $this->cursor, 0, @{ $params{specDef} } );
+
+    return 1;
+}
+
 1;
 __END__
 Foswiki - The Free and Open Source Wiki, http://foswiki.org/