Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-SVG for openSUSE:Factory checked in at 2022-06-02 21:54:30 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-SVG (Old) and /work/SRC/openSUSE:Factory/.perl-SVG.new.1548 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-SVG" Thu Jun 2 21:54:30 2022 rev:23 rq:980465 version:2.87 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-SVG/perl-SVG.changes 2021-04-29 01:38:33.394591720 +0200 +++ /work/SRC/openSUSE:Factory/.perl-SVG.new.1548/perl-SVG.changes 2022-06-02 21:54:43.664408178 +0200 @@ -1,0 +2,11 @@ +Fri May 20 03:09:01 UTC 2022 - Tina M??ller <[email protected]> + +- updated to 2.87 + see /usr/share/doc/packages/perl-SVG/Changes + + 2.87 2022.05.19 MANWAR + - Indent doc for text PR #15, thanks @benkasminbullock. + - Remove dead links to domain-squatted site PR #16, thanks @benkasminbullock. + - Perldity code base (still 2 not happy). + +------------------------------------------------------------------- Old: ---- SVG-2.86.tar.gz New: ---- SVG-2.87.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-SVG.spec ++++++ --- /var/tmp/diff_new_pack.W644nO/_old 2022-06-02 21:54:44.204408865 +0200 +++ /var/tmp/diff_new_pack.W644nO/_new 2022-06-02 21:54:44.208408871 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-SVG # -# Copyright (c) 2021 SUSE LLC +# Copyright (c) 2022 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -18,10 +18,10 @@ %define cpan_name SVG Name: perl-SVG -Version: 2.86 +Version: 2.87 Release: 0 -Summary: Perl extension for generating Scalable Vector Graphics (SVG) documents License: Artistic-1.0 OR GPL-1.0-or-later +Summary: Perl extension for generating Scalable Vector Graphics (SVG) documents URL: https://metacpan.org/release/%{cpan_name} Source0: https://cpan.metacpan.org/authors/id/M/MA/MANWAR/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml ++++++ SVG-2.86.tar.gz -> SVG-2.87.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/Changes new/SVG-2.87/Changes --- old/SVG-2.86/Changes 2021-04-22 09:21:17.000000000 +0200 +++ new/SVG-2.87/Changes 2022-05-19 19:00:42.000000000 +0200 @@ -1,5 +1,10 @@ Revision history for Perl extension SVG. +2.87 2022.05.19 MANWAR + - Indent doc for text PR #15, thanks @benkasminbullock. + - Remove dead links to domain-squatted site PR #16, thanks @benkasminbullock. + - Perldity code base (still 2 not happy). + 2.86 2021.04.22 MANWAR - Replace last use of "vars" with "our", thanks @JRaspass. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/META.json new/SVG-2.87/META.json --- old/SVG-2.86/META.json 2021-04-22 09:23:29.000000000 +0200 +++ new/SVG-2.87/META.json 2022-05-19 19:02:51.000000000 +0200 @@ -4,13 +4,13 @@ "Ronan Oger <[email protected]>" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter version 2.150010", + "generated_by" : "ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010", "license" : [ "perl_5" ], "meta-spec" : { "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";, - "version" : "2" + "version" : 2 }, "name" : "SVG", "no_index" : { @@ -52,23 +52,23 @@ "provides" : { "SVG" : { "file" : "lib/SVG.pm", - "version" : "2.86" + "version" : "2.87" }, "SVG::DOM" : { "file" : "lib/SVG/DOM.pm", - "version" : "2.86" + "version" : "2.87" }, "SVG::Element" : { "file" : "lib/SVG/Element.pm", - "version" : "2.86" + "version" : "2.87" }, "SVG::Extension" : { "file" : "lib/SVG/Extension.pm", - "version" : "2.86" + "version" : "2.87" }, "SVG::XML" : { "file" : "lib/SVG/XML.pm", - "version" : "2.86" + "version" : "2.87" } }, "release_status" : "stable", @@ -79,7 +79,7 @@ "web" : "https://github.com/manwar/SVG"; } }, - "version" : "2.86", + "version" : "2.87", "x_contributors" : [ "Peter Wainwright", "Ian Hickson", @@ -89,5 +89,5 @@ "Gabor Szabo", "Mohammad S Anwar" ], - "x_serialization_backend" : "JSON::PP version 2.27400_02" + "x_serialization_backend" : "JSON::PP version 4.02" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/META.yml new/SVG-2.87/META.yml --- old/SVG-2.86/META.yml 2021-04-22 09:23:29.000000000 +0200 +++ new/SVG-2.87/META.yml 2022-05-19 19:02:48.000000000 +0200 @@ -14,7 +14,7 @@ strict: '0' warnings: '0' dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter version 2.150010' +generated_by: 'ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -27,19 +27,19 @@ provides: SVG: file: lib/SVG.pm - version: '2.86' + version: '2.87' SVG::DOM: file: lib/SVG/DOM.pm - version: '2.86' + version: '2.87' SVG::Element: file: lib/SVG/Element.pm - version: '2.86' + version: '2.87' SVG::Extension: file: lib/SVG/Extension.pm - version: '2.86' + version: '2.87' SVG::XML: file: lib/SVG/XML.pm - version: '2.86' + version: '2.87' requires: Exporter: '0' Scalar::Util: '0' @@ -50,7 +50,7 @@ warnings: '0' resources: repository: https://github.com/manwar/SVG.git -version: '2.86' +version: '2.87' x_contributors: - 'Peter Wainwright' - 'Ian Hickson' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/Makefile.PL new/SVG-2.87/Makefile.PL --- old/SVG-2.86/Makefile.PL 2021-04-22 09:19:28.000000000 +0200 +++ new/SVG-2.87/Makefile.PL 2022-05-19 16:49:25.000000000 +0200 @@ -39,11 +39,11 @@ (eval { ExtUtils::MakeMaker->VERSION(6.46) } ? (META_MERGE => { 'meta-spec' => { version => 2 }, provides => { - 'SVG' => { file => 'lib/SVG.pm' , version => '2.86' }, - 'SVG::DOM' => { file => 'lib/SVG/DOM.pm' , version => '2.86' }, - 'SVG::Element' => { file => 'lib/SVG/Element.pm' , version => '2.86' }, - 'SVG::Extension' => { file => 'lib/SVG/Extension.pm', version => '2.86' }, - 'SVG::XML' => { file => 'lib/SVG/XML.pm' , version => '2.86' }, + 'SVG' => { file => 'lib/SVG.pm' , version => '2.87' }, + 'SVG::DOM' => { file => 'lib/SVG/DOM.pm' , version => '2.87' }, + 'SVG::Element' => { file => 'lib/SVG/Element.pm' , version => '2.87' }, + 'SVG::Extension' => { file => 'lib/SVG/Extension.pm', version => '2.87' }, + 'SVG::XML' => { file => 'lib/SVG/XML.pm' , version => '2.87' }, }, resources => { repository => { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/README new/SVG-2.87/README --- old/SVG-2.86/README 2021-04-22 09:17:03.000000000 +0200 +++ new/SVG-2.87/README 2022-05-19 16:48:15.000000000 +0200 @@ -12,7 +12,6 @@ "perldoc SVG" on the command line. (c) 2001-2008 Ronan Oger, RO IT Systems, -GmbH homepage: http://www.roitsystems.com CONTACT POINT ------------- @@ -46,9 +45,6 @@ The following URLs offer additional resources for users of SVG.pm: -* Perl SVG tutorials http://www.roitsystems.com/tutorial/ -* Perl SVG Zone homepage http://www.roitsystems.com/ -* gallery of the use of SVG.pm on the web http://roitsystems.com/gallery/svg/index.html * W3 Consortium http://www.w3.org/Graphics/SVG/ * Sams Publishing, "SVG Unleashed", September 2002. There is a Perl chapter * SVG Open Conference proceedings http://www.svgopen.org/ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/lib/SVG/DOM.pm new/SVG-2.87/lib/SVG/DOM.pm --- old/SVG-2.86/lib/SVG/DOM.pm 2021-04-22 09:19:42.000000000 +0200 +++ new/SVG-2.87/lib/SVG/DOM.pm 2022-05-19 18:22:06.000000000 +0200 @@ -4,7 +4,7 @@ use Scalar::Util qw/weaken/; -our $VERSION = '2.86'; +our $VERSION = '2.87'; # this module extends SVG::Element package SVG::Element; @@ -542,7 +542,7 @@ $index++; } - return -1; # Child not found + return -1; # Child not found } # --------------- diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/lib/SVG/Element.pm new/SVG-2.87/lib/SVG/Element.pm --- old/SVG-2.86/lib/SVG/Element.pm 2021-04-22 09:19:42.000000000 +0200 +++ new/SVG-2.87/lib/SVG/Element.pm 2022-05-19 18:39:38.000000000 +0200 @@ -3,7 +3,7 @@ use strict; use warnings; -our $VERSION = '2.86'; +our $VERSION = '2.87'; =pod @@ -19,11 +19,7 @@ =head1 SEE ALSO -For descreption of the methods see L<SVG> - -L<http://www.roitsystems.com/> ROASP.com: Serverside SVG server -L<http://www.roitsystems.com/> ROIT Systems: Commercial SVG perl solutions -L<http://www.w3c.org/Graphics/SVG/> SVG at the W3C +For description of the methods see L<SVG>. =cut @@ -60,10 +56,10 @@ if ( $key =~ /^-/ ) { if ( $key eq '-href' ) { $self->{'xlink:href'} = $attrs{$key}; - $self->{'xlink:type'} = $attrs{-type} if $attrs{-type}; - $self->{'xlink:role'} = $attrs{-role} if $attrs{-role}; + $self->{'xlink:type'} = $attrs{-type} if $attrs{-type}; + $self->{'xlink:role'} = $attrs{-role} if $attrs{-role}; $self->{'xlink:title'} = $attrs{-title} if $attrs{-title}; - $self->{'xlink:show'} = $attrs{-show} if $attrs{-show}; + $self->{'xlink:show'} = $attrs{-show} if $attrs{-show}; $self->{'xlink:arcrole'} = $attrs{-arcrole} if $attrs{-arcrole}; $self->{'xlink:actuate'} = $attrs{-actuate} @@ -393,7 +389,7 @@ return $self->{-document}->{-pi} unless scalar @text; my @pi; @pi = @{ $self->{-document}->{-pi} } if $self->{-document}->{-pi}; - unshift( @text, @pi ) if @pi; + unshift( @text, @pi ) if @pi; $self->{-document}->{-pi} = \@text; my $tag = $self->tag('pi'); return $tag; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/lib/SVG/Extension.pm new/SVG-2.87/lib/SVG/Extension.pm --- old/SVG-2.86/lib/SVG/Extension.pm 2021-04-22 09:19:42.000000000 +0200 +++ new/SVG-2.87/lib/SVG/Extension.pm 2022-05-19 16:49:07.000000000 +0200 @@ -2,7 +2,7 @@ use strict; use warnings; -our $VERSION = '2.86'; +our $VERSION = '2.87'; =head1 NAME diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/lib/SVG/XML.pm new/SVG-2.87/lib/SVG/XML.pm --- old/SVG-2.86/lib/SVG/XML.pm 2021-04-22 09:19:42.000000000 +0200 +++ new/SVG-2.87/lib/SVG/XML.pm 2022-05-19 16:49:07.000000000 +0200 @@ -2,7 +2,7 @@ use strict; use warnings; -our $VERSION = '2.86'; +our $VERSION = '2.87'; =pod @@ -22,11 +22,6 @@ L<SVG::Parser>, L<SVG::Extension> -For Commercial Perl/SVG development, refer to the following sites: -L<ROASP.com: Serverside SVG server|http://www.roitsystems.com/>, -L<ROIT Systems: Commercial SVG perl solutions|http://www.roitsystems.com/>, -L<SVG at the W3C|http://www.w3c.org/Graphics/SVG/> - =cut use Exporter; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/lib/SVG.pm new/SVG-2.87/lib/SVG.pm --- old/SVG-2.86/lib/SVG.pm 2021-04-22 09:19:42.000000000 +0200 +++ new/SVG-2.87/lib/SVG.pm 2022-05-19 18:57:46.000000000 +0200 @@ -7,7 +7,7 @@ use parent qw(SVG::Element SVG::Extension); use Scalar::Util qw/weaken/; -our $VERSION = '2.86'; +our $VERSION = '2.87'; =pod @@ -121,7 +121,7 @@ =for HTML <p><img src="http://perlmaven.com/img/svg/circle.svg"; alt="SVG example circle" /></p> -See also the B<examples> directory in this distribution which contain several fully documented examples. +See also the B<examples> directory in this distribution which contains several fully documented examples. =head1 DESCRIPTION @@ -144,7 +144,7 @@ =back -The L<"xmlify"> method takes a number of optional arguments that control how SVG +The L</xmlify> method takes a number of optional arguments that control how SVG renders the object into XML, and in particular determine whether a standalone SVG document or an inline SVG document fragment is generated: @@ -155,7 +155,7 @@ =head2 -inline -An inline SVG document fragment with no DTD that be embedded within other XML +An inline SVG document fragment with no DTD that is embedded within other XML content. As with standalone documents, an alternate namespace may be specified. No XML content is generated until the third step is reached. Up until this @@ -166,12 +166,12 @@ None. However, SVG permits both options and additional element methods to be specified in the import list. These options and elements are then available -for all SVG instances that are created with the L<"new"> constructor. For example, +for all SVG instances that are created with the L</new> constructor. For example, to change the indent string to two spaces per level: use SVG (-indent => " "); -With the exception of -auto, all options may also be specified to the L<"new"> +With the exception of -auto, all options may also be specified to the L</new> constructor. The currently supported options and their default value are: # processing options @@ -241,7 +241,6 @@ <!-- Generated using the Perl SVG Module V2.50 by Ronan Oger - Info: http://www.roitsystems.com/ --> =head1 METHODS @@ -308,7 +307,7 @@ =head2 xmlify (alias: to_xml render serialise serialize) -$string = $svg->xmlify(%attributes); + $string = $svg->xmlify(%attributes); Returns xml representation of svg document. @@ -326,7 +325,7 @@ =head2 tag (alias: element) -$tag = $svg->tag($name, %attributes) + $tag = $svg->tag($name, %attributes) Generic element generator. Creates the element named $name with the attributes specified in %attributes. This method is the basis of most of the explicit @@ -337,7 +336,7 @@ =head2 anchor -$tag = $svg->anchor(%attributes) + $tag = $svg->anchor(%attributes) Generate an anchor element. Anchors are put around objects to make them 'live' (i.e. clickable). It therefore requires a drawn object or group element @@ -345,7 +344,7 @@ =head3 optional anchor attributes -the following attributes are expected for anchor tags (any any tags which use -href links): +The following attributes are expected for anchor tags (any any tags which use -href links): =head2 -href required @@ -377,7 +376,7 @@ ); -for more information about the options above, refer to Link section in the SVG recommendation: L<http://www.w3.org/TR/SVG11/linking.html#Links> +For more information about the options above, refer to Link section in the SVG recommendation: L<http://www.w3.org/TR/SVG11/linking.html#Links> # add a circle to the anchor. The circle can be clicked on. $tag->circle(cx => 10, cy => 10, r => 1); @@ -404,7 +403,7 @@ =head2 circle -$tag = $svg->circle(%attributes) + $tag = $svg->circle(%attributes) Draw a circle at (cx,cy) with radius r. @@ -412,7 +411,7 @@ =head2 ellipse -$tag = $svg->ellipse(%attributes) + $tag = $svg->ellipse(%attributes) Draw an ellipse at (cx,cy) with radii rx,ry. @@ -459,7 +458,7 @@ =head2 image - $tag = $svg->image(%attributes) + $tag = $svg->image(%attributes) Draw an image at (x,y) with width 'width' and height 'height' linked to image resource '-href'. See also L<"use">. @@ -479,7 +478,7 @@ =head2 use -$tag = $svg->use(%attributes) + $tag = $svg->use(%attributes) Retrieve the content from an entity within an SVG document and apply it at (x,y) with width 'width' and height 'height' linked to image resource '-href'. @@ -502,7 +501,7 @@ =head2 polygon -$tag = $svg->polygon(%attributes) + $tag = $svg->polygon(%attributes) Draw an n-sided polygon with vertices at points defined by a string of the form 'x1,y1,x2,y2,x3,y3,... xy,yn'. The L<"get_path"> method is provided as a @@ -530,7 +529,7 @@ =head2 polyline -$tag = $svg->polyline(%attributes) + $tag = $svg->polyline(%attributes) Draw an n-point polyline with points defined by a string of the form 'x1,y1,x2,y2,x3,y3,... xy,yn'. The L<"get_path"> method is provided as a @@ -558,7 +557,7 @@ =head2 line -$tag = $svg->line(%attributes) + $tag = $svg->line(%attributes) Draw a straight line between two points (x1,y1) and (x2,y2). @@ -574,12 +573,12 @@ =head2 text -$text = $svg->text(%attributes)->cdata(); + $text = $svg->text(%attributes)->cdata(); -$text_path = $svg->text(-type=>'path'); -$text_span = $text_path->text(-type=>'span')->cdata('A'); -$text_span = $text_path->text(-type=>'span')->cdata('B'); -$text_span = $text_path->text(-type=>'span')->cdata('C'); + $text_path = $svg->text(-type=>'path'); + $text_span = $text_path->text(-type=>'span')->cdata('A'); + $text_span = $text_path->text(-type=>'span')->cdata('B'); + $text_span = $text_path->text(-type=>'span')->cdata('C'); Define the container for a text string to be drawn in the image. @@ -616,7 +615,7 @@ =head2 title -$tag = $svg->title(%attributes) + $tag = $svg->title(%attributes) Generate the title of the image. @@ -624,7 +623,7 @@ =head2 desc -$tag = $svg->desc(%attributes) + $tag = $svg->desc(%attributes) Generate the description of the image. @@ -632,7 +631,7 @@ =head2 comment -$tag = $svg->comment(@comments) + $tag = $svg->comment(@comments) Generate the description of the image. @@ -640,7 +639,7 @@ =head2 pi (Processing Instruction) -$tag = $svg->pi(@pi) + $tag = $svg->pi(@pi) Generate a set of processing instructions @@ -653,7 +652,7 @@ =head2 script -$tag = $svg->script(%attributes) + $tag = $svg->script(%attributes) Generate a script container for dynamic (client-side) scripting using ECMAscript, Javascript or other compatible scripting language. @@ -677,7 +676,7 @@ =head2 path -$tag = $svg->path(%attributes) + $tag = $svg->path(%attributes) Draw a path element. The path vertices may be provided as a parameter or calculated using the L<"get_path"> method. @@ -708,7 +707,7 @@ =head2 get_path -$path = $svg->get_path(%attributes) + $path = $svg->get_path(%attributes) Returns the text string of points correctly formatted to be incorporated into the multi-point SVG drawing object definitions (path, polyline, polygon) @@ -750,7 +749,7 @@ =head2 animate -$tag = $svg->animate(%attributes) + $tag = $svg->animate(%attributes) Generate an SMIL animation tag. This is allowed within any nonempty tag. Refer to the W3C for detailed information on the subtleties of the animate SMIL @@ -807,7 +806,7 @@ =head2 group -$tag = $svg->group(%attributes) + $tag = $svg->group(%attributes) Define a group of objects with common properties. Groups can have style, animation, filters, transformations, and mouse actions assigned to them. @@ -824,7 +823,7 @@ =head2 defs -$tag = $svg->defs(%attributes) + $tag = $svg->defs(%attributes) define a definition segment. A Defs requires children when defined using SVG.pm @@ -832,14 +831,14 @@ =head2 style -$svg->tag('style', %styledef); + $svg->tag('style', %styledef); -Sets/Adds style-definition for the following objects being created. +Sets/adds style-definition for the following objects being created. Style definitions apply to an object and all its children for all properties for which the value of the property is not redefined by the child. - $tag = $SVG->style(%attributes) + $tag = $SVG->style(%attributes) Generate a style container for inline or xlink:href based styling instructions @@ -859,20 +858,17 @@ # Create a external CSS stylesheet reference my $tag2 = $SVG->style(type=>"text/css", -href="/resources/example.css"); -=pod - - =head2 mouseaction -$svg->mouseaction(%attributes) + $svg->mouseaction(%attributes) Sets/Adds mouse action definitions for tag =head2 attrib - $svg->attrib($name, $value) + $svg->attrib($name, $value) -Sets/Adds attributes of an element. +Sets/adds attributes of an element. Retrieve an attribute: @@ -896,11 +892,11 @@ B<Aliases:> attr attribute -Sets/Replaces attributes for a tag. +Sets/replaces attributes for a tag. =head2 cdata -$svg->cdata($text) + $svg->cdata($text) Sets cdata to $text. SVG.pm allows you to set cdata for any tag. If the tag is meant to be an empty tag, SVG.pm will not complain, but the rendering agent will @@ -926,16 +922,16 @@ =head2 cdata_noxmlesc - $script = $svg->script(); - $script->cdata_noxmlesc($text); + $script = $svg->script(); + $script->cdata_noxmlesc($text); Generates cdata content for text and similar tags which do not get xml-escaped. In othe words, does not parse the content and inserts the exact string into the cdata location. =head2 CDATA - $script = $svg->script(); - $script->CDATA($text); + $script = $svg->script(); + $script->CDATA($text); Generates a <![CDATA[ ... ]]> tag with the contents of $text rendered exactly as supplied. SVG.pm allows you to set cdata for any tag. If the tag is meant to be an empty tag, SVG.pm will not complain, but the rendering agent will @@ -992,9 +988,9 @@ =head2 xmlescp and xmlescape -$string = $svg->xmlescp($string) -$string = $svg->xmlesc($string) -$string = $svg->xmlescape($string) + $string = $svg->xmlescp($string) + $string = $svg->xmlesc($string) + $string = $svg->xmlescape($string) SVG module does not xml-escape characters that are incompatible with the XML specification. B<xmlescp> and B<xmlescape> provides this functionality. It is a helper function which generates an XML-escaped string for reserved characters such as ampersand, open and close brackets, etcetera. @@ -1011,7 +1007,7 @@ =head2 filter -$tag = $svg->filter(%attributes) + $tag = $svg->filter(%attributes) Generate a filter. Filter elements contain L<"fe"> filter sub-elements. @@ -1030,7 +1026,7 @@ =head2 fe -$tag = $svg->fe(-type=>'type', %attributes) + $tag = $svg->fe(-type=>'type', %attributes) Generate a filter sub-element. Must be a child of a L<"filter"> element. @@ -1102,11 +1098,10 @@ =head2 pattern -$tag = $svg->pattern(%attributes) + $tag = $svg->pattern(%attributes) Define a pattern for later reference by url. - my $pattern = $svg->pattern( id => "Argyle_1", width => "50", @@ -1117,7 +1112,7 @@ =head2 set -$tag = $svg->set(%attributes) + $tag = $svg->set(%attributes) Set a definition for an SVG object in one section, to be referenced in other sections as needed. @@ -1132,7 +1127,7 @@ =head2 stop -$tag = $svg->stop(%attributes) + $tag = $svg->stop(%attributes) Define a stop boundary for L<"gradient"> @@ -1146,7 +1141,7 @@ =head2 gradient -$tag = $svg->gradient(%attributes) + $tag = $svg->gradient(%attributes) Define a color gradient. Can be of type B<linear> or B<radial> @@ -1210,7 +1205,7 @@ =head2 * vkern -See e.g. L<"pattern"> for an example of the use of these methods. +See e.g. L</pattern> for an example of the use of these methods. =head1 METHODS IMPORTED BY SVG::DOM @@ -1262,7 +1257,6 @@ =head2 * cloneNode - =cut #------------------------------------------------------------------------------- @@ -1291,7 +1285,7 @@ -xml_xlink => 'http://www.w3.org/1999/xlink', -standalone => 'yes', -pubid => '-//W3C//DTD SVG 1.0//EN', # formerly -identifier - -sysid => 'http://www.w3.org/TR/2001/REC-SVG-20010904/DTD/svg10.dtd', + -sysid => 'http://www.w3.org/TR/2001/REC-SVG-20010904/DTD/svg10.dtd', ); sub import { @@ -1498,7 +1492,7 @@ or $self->{-docref}{-creditsinserted} ) { $self->comment( - "\n\tGenerated using the Perl SVG Module V$VERSION\n\tby Ronan Oger\n\tInfo: http://www.roitsystems.com/\n\t"; + "\n\tGenerated using the Perl SVG Module V$VERSION\n\tby Ronan Oger\n\n\t" ); $self->{-docref}{-creditsinserted} = 1; } @@ -1558,10 +1552,10 @@ Peter Wainwright, Excellent ideas, beta-testing, writing SVG::Parser and much of SVG::DOM. Fredo, http://www.penguin.at0.net/~fredo/ - provided example code and initial feedback for early SVG.pm versions and the idea of a simplified svg generator. -Adam Schneider, -Brial Pilpr??, +Adam Schneider +Brial Pilpr?? Ian Hickson -Steve Lihn, +Steve Lihn Allen Day Martin Owens - SVG::DOM improvements in version 3.34 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/t/00-report-prereqs.t new/SVG-2.87/t/00-report-prereqs.t --- old/SVG-2.86/t/00-report-prereqs.t 2021-04-22 09:17:03.000000000 +0200 +++ new/SVG-2.87/t/00-report-prereqs.t 2022-05-19 18:41:58.000000000 +0200 @@ -87,7 +87,7 @@ } else { $cpan_meta_error = $@; # capture error from CPAN::Meta->load_file($source) - $source = 'static metadata'; + $source = 'static metadata'; } my @full_reports; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/t/04-inline.t new/SVG-2.87/t/04-inline.t --- old/SVG-2.86/t/04-inline.t 2021-04-22 09:17:03.000000000 +0200 +++ new/SVG-2.87/t/04-inline.t 2022-05-19 17:35:04.000000000 +0200 @@ -7,7 +7,7 @@ # test: -inline my $svg1 = SVG->new(); -isa_ok $svg1, 'SVG'; +isa_ok $svg1, 'SVG'; isa_ok $svg1->text->cdata("An inline document"), 'SVG::Element'; my $xml1a = $svg1->render(); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/t/09-script.t new/SVG-2.87/t/09-script.t --- old/SVG-2.86/t/09-script.t 2021-04-22 09:17:03.000000000 +0200 +++ new/SVG-2.87/t/09-script.t 2022-05-19 18:55:57.000000000 +0200 @@ -5,13 +5,11 @@ use SVG; my $svg = SVG->new; - my $tag = $svg->script( type => "text/ecmascript" ); -# populate the script tag with cdata -# be careful to manage the javascript line ends. -# qq???text??? or qq??text?? where text is the script -# works well for this. +# populate the script tag with cdata be careful to manage the +# javascript line ends. q???text??? or qq??text?? where text is the +# script works well for this. $tag->CDATA( qq| diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/SVG-2.86/t/15-parentage.t new/SVG-2.87/t/15-parentage.t --- old/SVG-2.86/t/15-parentage.t 2021-04-22 09:17:03.000000000 +0200 +++ new/SVG-2.87/t/15-parentage.t 2022-05-19 18:47:42.000000000 +0200 @@ -31,7 +31,7 @@ is( $parent->findChildIndex($child1), -1, 'child1 is gone' ); is( $parent->insertAtIndex( $child1, 0 ), 1 ); -is( $parent->findChildIndex($child1), 0, 'child1 is back' ); -is( $parent->removeAtIndex(0), $child1 ); -is( $parent->findChildIndex($child1), -1, 'child1 is gone again' ); +is( $parent->findChildIndex($child1), 0, 'child1 is back' ); +is( $parent->removeAtIndex(0), $child1 ); +is( $parent->findChildIndex($child1), -1, 'child1 is gone again' );
![http://perlmaven.com/img/svg/circle.svg"](http://perlmaven.com/img/svg/circle.svg"){kind=link}