[Clipart] screenshot 104

[Jose Hevia]

> 
> > > If we don't have a tool to do that, I should write one.
> > 
> > I didn't write a robust and reusable tool, but the commandline that I
> > used can serve as a starting point, so I'll paste that in here, so
> > that we don't lose it:
> > 
> > perl -e '
> > open RDF, "../../metadata.rdf";
> > my $rdf; { local $/ = undef; $rdf = <RDF>; } close RDF;
> > for $dir (qw(actions apps devices filesystems mimetypes)) {
> >     for $f (<$dir/*.svg>) {
> >         open SVG, $f; local $/ = undef;
> >         my $svg = <SVG>; close SVG;
> >         open SVG, ">" . $f;
> >         $svg =~ s!</svg>!$rdf</svg>!i;
> >         print SVG $svg; close SVG;
> >         print "$f\n";   }}'
> > 
> > This doesn't handle the unzipping and rezipping (I just used unzip and
> > zip for that this time), and it's got the subdirectories and things
> > hardcoded, but it's simple and could be adapted to create a more
> > general-purpose metadata propagation tool.  I made no attempt to merge
> > with existing embedded metadata in the SVG files, since there wasn't
> > any in this case.  (If a situation comes up where that is needed,
> > there is code in upload.cgi that could be helpful, but in this case it
> > wasn't necessary.)
> 
>   Thanks for your work, I thougth the package was lost. Maybe it would
> be useful to use the same mechanism we use with screenshot update notice
> to notice about zipped content with only one metadata.
>        Bye                                   Jose Hevia
>