![](https://seccdn.libravatar.org/avatar/e2145bc5cf53dda95c308a3c75e8fef3.jpg?s=120&d=mm&r=g)
Hello community, here is the log from the commit of package perl-Mac-PropertyList for openSUSE:Factory checked in at 2012-10-03 08:46:51 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Mac-PropertyList (Old) and /work/SRC/openSUSE:Factory/.perl-Mac-PropertyList.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-Mac-PropertyList", Maintainer is "" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Mac-PropertyList/perl-Mac-PropertyList.changes 2011-09-23 12:38:00.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Mac-PropertyList.new/perl-Mac-PropertyList.changes 2012-10-03 08:46:56.000000000 +0200 @@ -1,0 +2,9 @@ +Wed Sep 26 17:55:05 UTC 2012 - Greg.Freemyer@gmail.com + +- ran spec-cleaner +- upgrade to v1.37 + * fix plist_as_perl to be the same as as_perl (and as documented) + * Update the docs, and make the previous dev releases official + * Document the as_perl method, which undecorates that internal + +------------------------------------------------------------------- Old: ---- Mac-PropertyList-1.34.tar.gz New: ---- Mac-PropertyList-1.37.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Mac-PropertyList.spec ++++++ --- /var/tmp/diff_new_pack.esL1w6/_old 2012-10-03 08:46:57.000000000 +0200 +++ /var/tmp/diff_new_pack.esL1w6/_new 2012-10-03 08:46:57.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Mac-PropertyList # -# Copyright (c) 2011 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2012 SUSE LINUX Products GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -16,22 +16,21 @@ # - Name: perl-Mac-PropertyList -Version: 1.34 -Release: 1 -License: GPL-1.0+ or Artistic-1.0 +Version: 1.37 +Release: 0 %define cpan_name Mac-PropertyList -Summary: work with Mac plists at a low level -Url: http://search.cpan.org/dist/Mac-PropertyList/ +Summary: Work with Mac plists at a low level +License: GPL-1.0+ or Artistic-1.0 Group: Development/Libraries/Perl +Url: http://search.cpan.org/dist/Mac-PropertyList/ Source: http://www.cpan.org/authors/id/B/BD/BDFOY/%{cpan_name}-%{version}.tar.gz -BuildArch: noarch -BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl >= 5.10.0 BuildRequires: perl-macros BuildRequires: perl(XML::Entities) Requires: perl(XML::Entities) +BuildRoot: %{_tmppath}/%{name}-%{version}-build +BuildArch: noarch %{perl_requires} %description @@ -51,11 +50,11 @@ %setup -q -n %{cpan_name}-%{version} %build -%{__perl} Makefile.PL INSTALLDIRS=vendor -%{__make} %{?_smp_mflags} +perl Makefile.PL INSTALLDIRS=vendor +make %{?_smp_mflags} %check -%{__make} test +make test %install %perl_make_install @@ -63,7 +62,7 @@ %perl_gen_filelist %clean -%{__rm} -rf %{buildroot} +rm -rf %{buildroot} %files -f %{name}.files %defattr(-,root,root,755) ++++++ Mac-PropertyList-1.34.tar.gz -> Mac-PropertyList-1.37.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mac-PropertyList-1.34/Changes new/Mac-PropertyList-1.37/Changes --- old/Mac-PropertyList-1.34/Changes 2011-07-12 00:13:36.000000000 +0200 +++ new/Mac-PropertyList-1.37/Changes 2012-08-30 18:40:07.000000000 +0200 @@ -1,4 +1,15 @@ +1.37 - Thu Aug 30 11:39:39 2012 + * fix plist_as_perl to be the same as as_perl (and as + documented) + +1.36 - Sat Jun 16 16:10:01 2012 + * Update the docs, and make the previous dev releases official + +1.35 - Fri Mar 9 19:38:59 2012 + * Document the as_perl method, which undecorates that internal + data structure + 1.34 - Mon Jul 11 18:10:36 2011 * In ReadBinary, handle the data as big-endian. This means you need the > pack modifier introduced in 5.10. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mac-PropertyList-1.34/MANIFEST new/Mac-PropertyList-1.37/MANIFEST --- old/Mac-PropertyList-1.34/MANIFEST 2011-07-12 00:13:38.000000000 +0200 +++ new/Mac-PropertyList-1.37/MANIFEST 2012-08-30 18:40:08.000000000 +0200 @@ -16,7 +16,6 @@ plists/com.apple.iTunes.plist plists/com.apple.systempreferences.plist plists/com.unsanity.windowshadex.plist -plists/comments.plist plists/the_perl_review.abcdp README t/array.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mac-PropertyList-1.34/META.yml new/Mac-PropertyList-1.37/META.yml --- old/Mac-PropertyList-1.34/META.yml 2011-07-12 00:13:38.000000000 +0200 +++ new/Mac-PropertyList-1.37/META.yml 2012-08-30 18:40:08.000000000 +0200 @@ -1,6 +1,6 @@ --- #YAML:1.0 name: Mac-PropertyList -version: 1.34 +version: 1.37 abstract: work with Mac plists at a low level author: - brian d foy <bdfoy@cpan.org> @@ -13,6 +13,7 @@ requires: Math::BigInt: 0 MIME::Base64: 0 + parent: 0 Test::More: 0 XML::Entities: 0 no_index: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mac-PropertyList-1.34/Makefile.PL new/Mac-PropertyList-1.37/Makefile.PL --- old/Mac-PropertyList-1.34/Makefile.PL 2011-07-12 00:13:36.000000000 +0200 +++ new/Mac-PropertyList-1.37/Makefile.PL 2012-08-30 18:40:07.000000000 +0200 @@ -17,9 +17,9 @@ 'MIME::Base64' => '0', 'Test::More' => '0', 'XML::Entities' => '0', + 'parent' => '0', }, - clean => { FILES => 'Mac-PropertyList-*' }, - + clean => { FILES => 'Mac-PropertyList-*' }, ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mac-PropertyList-1.34/lib/Mac/PropertyList/ReadBinary.pm new/Mac-PropertyList-1.37/lib/Mac/PropertyList/ReadBinary.pm --- old/Mac-PropertyList-1.34/lib/Mac/PropertyList/ReadBinary.pm 2011-07-12 00:13:36.000000000 +0200 +++ new/Mac-PropertyList-1.37/lib/Mac/PropertyList/ReadBinary.pm 2012-08-30 18:40:07.000000000 +0200 @@ -13,10 +13,12 @@ use POSIX qw(SEEK_END SEEK_SET); use XML::Entities (); -$VERSION = '1.34'; +$VERSION = '1.37'; __PACKAGE__->_run( @ARGV ) unless caller; +=encoding utf8 + =head1 NAME Mac::PropertyList::ReadBinary - read binary property list files @@ -30,7 +32,6 @@ my $plist = $parser->plist; - # use indirectly, automatically selects right reader use Mac::PropertyList; @@ -39,14 +40,14 @@ =head1 DESCRIPTION This module is a low-level interface to the Mac OS X Property List -(plist) format. You probably shouldn't use this in -applications---build interfaces on top of this so you don't have to +(plist) format. You probably shouldn't use this in +applications—build interfaces on top of this so you don't have to put all the heinous multi-level object stuff where people have to look at it. You can parse a plist file and get back a data structure. You can take that data structure and get back the plist as XML (but not binary -yet). If you want to change the structure inbetween that's your +yet). If you want to change the structure inbetween that's your business. :) See C<Mac::PropertyList> for more details. @@ -390,7 +391,7 @@ =head1 COPYRIGHT AND LICENSE -Copyright (c) 2004-2011 brian d foy. All rights reserved. +Copyright (c) 2004-2012 brian d foy. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mac-PropertyList-1.34/lib/Mac/PropertyList.pm new/Mac-PropertyList-1.37/lib/Mac/PropertyList.pm --- old/Mac-PropertyList-1.34/lib/Mac/PropertyList.pm 2011-07-12 00:13:36.000000000 +0200 +++ new/Mac-PropertyList-1.37/lib/Mac/PropertyList.pm 2012-08-30 18:40:07.000000000 +0200 @@ -9,7 +9,7 @@ use Data::Dumper; use XML::Entities; -use base qw(Exporter); +use parent qw(Exporter); @EXPORT_OK = qw( parse_plist @@ -24,7 +24,9 @@ 'all' => \@EXPORT_OK, ); -$VERSION = '1.34'; +$VERSION = '1.37'; + +=encoding utf8 =head1 NAME @@ -32,9 +34,10 @@ =head1 SYNOPSIS - use Mac::PropertyList; + use Mac::PropertyList qw(:all); my $data = parse_plist( $text ); + my $perl = $data->as_perl; # == OR == my $data = parse_plist_file( $filename ); @@ -51,6 +54,7 @@ my $plist = Mac::PropertyList::dict->new( \%hash ); + my $perl = $plist->as_perl; =head1 DESCRIPTION @@ -73,7 +77,7 @@ http://www.apple.com/DTDs/PropertyList-1.0.dtd -One big problem exists--its dict type uses a flat structure to list +One big problem exists—its dict type uses a flat structure to list keys and values so that values are only associated with their keys by their position in the file rather than by the structure of the DTD. This problem is the major design hinderance in this module. A smart @@ -102,6 +106,12 @@ Mac::PropertyList::date Mac::PropertyList::array Mac::PropertyList::dict + Mac::PropertyList::true + Mac::PropertyList::false + +Note that the Xcode property list editor abstracts the C<true> and +C<false> objects as just C<Boolean>. They are separate tags in the +plist format though. =over 4 @@ -122,6 +132,12 @@ Create a string version of the object, recursively if necessary. +=item as_perl + +Turn the plist data structure, which is decorated with extra +information, into a lean Perl data structure without the value type +information or blessed objects. + =back =cut @@ -452,8 +468,7 @@ =cut -sub plist_as_string - { +sub plist_as_string { my $object = CORE::shift; my $string = $XML_head; @@ -468,20 +483,12 @@ =item plist_as_perl Return the plist data structure as an unblessed Perl data structure. -There won't be any C<Mac::PropertyList> objects in the results. +There won't be any C<Mac::PropertyList> objects in the results. This +is really just C<as_perl>. =cut -sub plist_as_perl - { - my $object = CORE::shift; - - my $string = '$VAR = '; - - $string .= $object->as_perl; - - return $string; - } +sub plist_as_perl { $_[0]->as_perl } # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # package Mac::PropertyList::Source; @@ -708,8 +715,7 @@ return $string; } -sub as_perl - { +sub as_perl { my $self = CORE::shift; my %dict = map { @@ -834,7 +840,7 @@ =head1 COPYRIGHT AND LICENSE -Copyright (c) 2004-2011 brian d foy. All rights reserved. +Copyright (c) 2004-2012 brian d foy. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. -- To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org For additional commands, e-mail: opensuse-commit+help@opensuse.org