r44598 - in /branches/upstream/libpalm-perl/current: Changes LICENSE META.yml Makefile.PL README lib/Address.pm lib/DateTime.pm lib/Datebook.pm lib/Mail.pm lib/Memo.pm lib/PDB.pm lib/Palm.pm lib/Raw.pm lib/StdAppInfo.pm lib/ToDo.pm lib/ZirePhoto.pm
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Tue Sep 22 01:59:25 UTC 2009
Author: jawnsy-guest
Date: Tue Sep 22 01:59:19 2009
New Revision: 44598
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=44598
Log:
[svn-upgrade] Integrating new upstream version, libpalm-perl (1.011)
Modified:
branches/upstream/libpalm-perl/current/Changes
branches/upstream/libpalm-perl/current/LICENSE
branches/upstream/libpalm-perl/current/META.yml
branches/upstream/libpalm-perl/current/Makefile.PL
branches/upstream/libpalm-perl/current/README
branches/upstream/libpalm-perl/current/lib/Address.pm
branches/upstream/libpalm-perl/current/lib/DateTime.pm
branches/upstream/libpalm-perl/current/lib/Datebook.pm
branches/upstream/libpalm-perl/current/lib/Mail.pm
branches/upstream/libpalm-perl/current/lib/Memo.pm
branches/upstream/libpalm-perl/current/lib/PDB.pm
branches/upstream/libpalm-perl/current/lib/Palm.pm
branches/upstream/libpalm-perl/current/lib/Raw.pm
branches/upstream/libpalm-perl/current/lib/StdAppInfo.pm
branches/upstream/libpalm-perl/current/lib/ToDo.pm
branches/upstream/libpalm-perl/current/lib/ZirePhoto.pm
Modified: branches/upstream/libpalm-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/Changes?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/Changes (original)
+++ branches/upstream/libpalm-perl/current/Changes Tue Sep 22 01:59:19 2009
@@ -1,3 +1,8 @@
+2009-08-17 Tim Adye <T.J.Adye at rl.ac.uk>
+
+ * Palm/Datebook.pm: add support for the newer-format Palm Calendar
+ databases.
+
2007-07-30 brian d foy <bdfoy at cpan.org>
* cleaned up the pod coverage test.
* add License and Author stuff to the distro
Modified: branches/upstream/libpalm-perl/current/LICENSE
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/LICENSE?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/LICENSE (original)
+++ branches/upstream/libpalm-perl/current/LICENSE Tue Sep 22 01:59:19 2009
@@ -1,7 +1,1 @@
-{\rtf1\mac\ansicpg10000\cocoartf824\cocoasubrtf420
-{\fonttbl\f0\fswiss\fcharset77 Helvetica;}
-{\colortbl;\red255\green255\blue255;}
-\margl1440\margr1440\vieww9000\viewh8400\viewkind0
-\pard\tx720\tx1440\tx2160\tx2880\tx3600\tx4320\tx5040\tx5760\tx6480\tx7200\tx7920\tx8640\ql\qnatural\pardirnatural
-
-\f0\fs24 \cf0 You can use p5-Palm under the same terms as Perl itself.}
+You can use p5-Palm under the same terms as Perl itself.
Modified: branches/upstream/libpalm-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/META.yml?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/META.yml (original)
+++ branches/upstream/libpalm-perl/current/META.yml Tue Sep 22 01:59:19 2009
@@ -1,14 +1,22 @@
--- #YAML:1.0
-name: p5-Palm
-version: 1.009
-abstract: Module for handling PalmOS databases
-license: perl
-generated_by: ExtUtils::MakeMaker version 6.32
-distribution_type: module
-requires:
- Test::More: 0
-meta-spec:
- url: http://module-build.sourceforge.net/META-spec-v1.2.html
- version: 1.2
+name: p5-Palm
+version: 1.011
+abstract: Module for handling PalmOS databases
author:
- brian d foy <bdfoy at cpan.org>
+license: perl
+distribution_type: module
+configure_requires:
+ ExtUtils::MakeMaker: 0
+build_requires:
+ ExtUtils::MakeMaker: 0
+requires:
+ Test::More: 0
+no_index:
+ directory:
+ - t
+ - inc
+generated_by: ExtUtils::MakeMaker version 6.50
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
Modified: branches/upstream/libpalm-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/Makefile.PL?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/Makefile.PL (original)
+++ branches/upstream/libpalm-perl/current/Makefile.PL Tue Sep 22 01:59:19 2009
@@ -1,6 +1,8 @@
use ExtUtils::MakeMaker;
-eval "use Test::Manifest 1.14";
+require 5.006;
+
+eval "use Test::Manifest 1.21";
my @classes = qw(
Address Datebook DateTime Mail
@@ -11,7 +13,7 @@
WriteMakefile(
'NAME' => 'Palm',
'ABSTRACT' => 'Module for handling PalmOS databases',
- 'VERSION' => '1.009',
+ 'VERSION_FROM' => 'lib/Palm.pm',
'LICENSE' => 'perl',
'DISTNAME' => 'p5-Palm', # More descriptive than just "Palm"
'AUTHOR' => 'brian d foy <bdfoy at cpan.org>',
@@ -25,11 +27,6 @@
map { ( "lib/$_.pm", "\$(INST_LIBDIR)/Palm/$_.pm" ) } @classes
},
- 'MAN3PODS' => {
- 'lib/Palm.pm' => '$(INST_MAN3DIR)/Palm.3',
- map { ( "lib/$_.pm", "\$(INST_MAN3DIR)/Palm::$_.3" ) } @classes
- },
-
'EXE_FILES' => [ 'examples/pdbdump' ],
clean => { FILES => q|*.bak p5-*| },
Modified: branches/upstream/libpalm-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/README?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/README (original)
+++ branches/upstream/libpalm-perl/current/README Tue Sep 22 01:59:19 2009
@@ -2,7 +2,7 @@
manipulating, and writing the .pdb and .prc database files used by
PalmOS devices such as the PalmPilot and its successors.
-Copyright (C) 1999, 2000 by Andrew Arensburger
+Copyright (C) 1999-2000 by Andrew Arensburger
This program is free software; you can redistribute it and/or
modify it under the terms of the Artistic License, a copy of which
@@ -15,7 +15,8 @@
* INSTALLING:
- This is pretty standard:
+This is pretty standard:
+
- Run "perl Makefile.PL" to create the Makefile.
- Run "make" to build everything.
- Run "make install" to install the package.
@@ -24,16 +25,23 @@
* DOCUMENTATION:
- All documentation is in the form of PODs embedded in the module
- files themselves. Use pod2text Palm/PDB.pm to read the
- documentation for Palm::PDB. You'll want to start with Palm::PDB,
- then Palm::Raw, then the others.
+All documentation is in the form of PODs embedded in the module
+files themselves. Use pod2text Palm/PDB.pm to read the
+documentation for Palm::PDB. You'll want to start with Palm::PDB,
+then Palm::Raw, then the others.
* FEEDBACK:
If you have any comments, suggestions, bug reports, patches,
-etc., please send mail to the maintainer, Andrew Arensburger, at
-<arensb at ooblick.com>. See also http://www.ooblick.com/software/coldsync/
+etc., please send mail to the maintainer, brian d foy, at
+<bdfoy at cpan.org>.
+
+* CONTRIBUTING
+
+The source is in Github: http://github.com/briandfoy/p5-Palm/tree/master
+
+If you have a change, fork the repo, make your patch, and send me a
+pull request. Don't be scared; it's easy!
* AUTHORS AND CONTRIBUTORS:
Modified: branches/upstream/libpalm-perl/current/lib/Address.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/Address.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/Address.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/Address.pm Tue Sep 22 01:59:19 2009
@@ -5,8 +5,6 @@
# Copyright (C) 1999, 2000, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: Address.pm,v 1.19 2002/11/07 14:11:42 arensb Exp $
use strict;
package Palm::Address;
@@ -18,7 +16,7 @@
%fieldMapBits );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.19 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@ISA = qw( Palm::StdAppInfo Palm::Raw );
@@ -677,9 +675,17 @@
1;
__END__
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/DateTime.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/DateTime.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/DateTime.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/DateTime.pm Tue Sep 22 01:59:19 2009
@@ -12,7 +12,6 @@
# dlptime - PalmOS DlpDateTimeType (raw)
# datetime - PalmOS DateTimeType (raw)
# palmtime - Decoded date/time
-#
package Palm::DateTime;
@@ -20,9 +19,10 @@
use Exporter;
use POSIX;
+use vars qw($VERSION);
# One liner, to allow MakeMaker to work.
-$Palm::DateTime::VERSION = do { my @r = (q$Revision: 1.4 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@Palm::DateTime::ISA = qw( Exporter );
Modified: branches/upstream/libpalm-perl/current/lib/Datebook.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/Datebook.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/Datebook.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/Datebook.pm Tue Sep 22 01:59:19 2009
@@ -1,12 +1,10 @@
# Palm::Datebook.pm
#
-# Perl class for dealing with Palm DateBook databases.
+# Perl class for dealing with Palm DateBook and Calendar databases.
#
# Copyright (C) 1999-2001, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: Datebook.pm,v 1.20 2003/10/10 23:19:58 azummo Exp $
use strict;
package Palm::Datebook;
@@ -16,14 +14,14 @@
use vars qw( $VERSION @ISA );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.20 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@ISA = qw( Palm::StdAppInfo Palm::Raw );
=head1 NAME
-Palm::Datebook - Handler for Palm DateBook databases.
+Palm::Datebook - Handler for Palm DateBook and Calendar databases.
=head1 SYNOPSIS
@@ -32,7 +30,7 @@
=head1 DESCRIPTION
The Datebook PDB handler is a helper class for the Palm::PDB package.
-It parses DateBook databases.
+It parses DateBook and Calendar databases.
=head2 AppInfo block
@@ -189,6 +187,10 @@
A text string, the description of the event.
+ $record->{location}
+
+A text string, the location (if any) of the event (Calendar database only).
+
$record->{note}
A text string, the note (if any) attached to the event.
@@ -202,15 +204,18 @@
{
&Palm::PDB::RegisterPDBHandlers(__PACKAGE__,
[ "date", "DATA" ],
+ [ "PDat", "DATA" ],
);
}
=head2 new
$pdb = new Palm::Datebook;
+ $pdb = new Palm::Datebook({app => 'Calendar'});
Create a new PDB, initialized with the various Palm::Datebook fields
-and an empty record list.
+and an empty record list. Creates a Datebook PDB by default.
+Specify the app parameter as 'Calendar' to create a Calendar PDB.
=cut
#'
@@ -220,13 +225,19 @@
sub new
{
my $classname = shift;
+ my $params = $_[0] || {};
my $self = $classname->SUPER::new(@_);
# Create a generic PDB. No need to rebless it,
# though.
- $self->{name} = "DatebookDB"; # Default
- $self->{creator} = "date";
- $self->{type} = "DATA";
+ if ($params->{app} eq 'Calendar' || $self->{creator} eq 'PDat') {
+ $self->{name} ||= "CalendarDB-PDat"; # Default
+ $self->{creator} = "PDat" if $self->{creator} eq "\0\0\0\0";
+ } else {
+ $self->{name} ||= "DatebookDB"; # Default
+ $self->{creator} = "date" if $self->{creator} eq "\0\0\0\0";
+ }
+ $self->{type} = "DATA" if $self->{type} eq "\0\0\0\0";
$self->{attributes}{resource} = 0;
# The PDB is not a resource database by
# default, but it's worth emphasizing,
@@ -281,6 +292,7 @@
$retval->{description} = "";
$retval->{note} = undef;
+ $retval->{location} = undef;
return $retval;
}
@@ -336,6 +348,7 @@
my $self = shift;
my %record = @_;
my $data;
+ my $iscal = ($self->{creator} eq 'PDat');
delete $record{offset}; # This is useless
@@ -377,14 +390,15 @@
$record{year} = $year;
# Flags
- my $when_changed = ($flags & 0x8000 ? 1 : 0);
- my $have_alarm = ($flags & 0x4000 ? 1 : 0);
- my $have_repeat = ($flags & 0x2000 ? 1 : 0);
- my $have_note = ($flags & 0x1000 ? 1 : 0);
- my $have_exceptions = ($flags & 0x0800 ? 1 : 0);
+ my $when_changed = ($flags & 0x8000 ? 1 : 0);
+ my $have_alarm = ($flags & 0x4000 ? 1 : 0);
+ my $have_repeat = ($flags & 0x2000 ? 1 : 0);
+ my $have_note = ($flags & 0x1000 ? 1 : 0);
+ my $have_exceptions = ($flags & 0x0800 ? 1 : 0);
my $have_description = ($flags & 0x0400 ? 1 : 0);
-
- $record{other_flags} = $flags & 0x03ff;
+ my $have_location = (($iscal && ($flags & 0x0200)) ? 1 : 0);
+
+ $record{other_flags} = $flags & ($iscal ? 0x01ff : 0x03ff);
if ($when_changed)
{
@@ -517,6 +531,16 @@
$record{note} = $note;
}
+ if ($have_location)
+ {
+ my $location;
+
+ $location = shift @fields;
+ $record{location} = $location;
+ }
+
+ $record{other_data}= join ("\0", @fields) if @fields;
+
delete $record{data};
return \%record;
@@ -530,6 +554,7 @@
my $rawDate;
my $flags;
+ my $iscal = ($self->{creator} eq 'PDat');
$rawDate = ($record->{day} & 0x001f) |
(($record->{month} & 0x000f) << 5) |
@@ -543,6 +568,7 @@
# $flags |= 0x1000 if $record->{note} ne "";
# $flags |= 0x0800 if $#{$record->{exceptions}} >= 0;
# $flags |= 0x0400 if $record->{description} ne "";
+# $flags |= 0x0200 if $iscal && $record->{location} ne "";
# $retval = pack "C C C C n n",
# $record->{start_hour},
@@ -665,6 +691,14 @@
$note = $record->{note} . "\0";
}
+ my $location = undef;
+
+ if ($iscal && defined($record->{location}) && ($record->{location} ne ""))
+ {
+ $flags |= 0x0200;
+ $location = $record->{location} . "\0";
+ }
+
$retval = pack "C C C C n n",
$record->{start_hour},
$record->{start_minute},
@@ -673,11 +707,12 @@
$rawDate,
$flags;
- $retval .= $alarm if defined($alarm);
- $retval .= $repeat if defined($repeat);
+ $retval .= $alarm if defined($alarm);
+ $retval .= $repeat if defined($repeat);
$retval .= $exceptions if defined($exceptions);
$retval .= $description if defined($description);
- $retval .= $note if defined($note);
+ $retval .= $note if defined($note);
+ $retval .= $location if defined($location);
return $retval;
}
@@ -685,9 +720,17 @@
1;
__END__
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/Mail.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/Mail.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/Mail.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/Mail.pm Tue Sep 22 01:59:19 2009
@@ -5,8 +5,6 @@
# Copyright (C) 1999, 2000, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: Mail.pm,v 1.17 2003/06/26 19:21:09 azummo Exp $
use strict;
package Palm::Mail;
@@ -15,7 +13,7 @@
use vars qw( $VERSION @ISA );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.17 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@ISA = qw( Palm::StdAppInfo Palm::Raw );
@@ -425,9 +423,17 @@
1;
__END__
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/Memo.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/Memo.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/Memo.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/Memo.pm Tue Sep 22 01:59:19 2009
@@ -5,8 +5,6 @@
# Copyright (C) 1999, 2000, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: Memo.pm,v 1.13 2002/11/07 14:12:05 arensb Exp $
use strict;
package Palm::Memo;
@@ -15,7 +13,7 @@
use vars qw( $VERSION @ISA );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.13 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@ISA = qw( Palm::StdAppInfo Palm::Raw );
@@ -203,9 +201,17 @@
1;
__END__
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/PDB.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/PDB.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/PDB.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/PDB.pm Tue Sep 22 01:59:19 2009
@@ -5,8 +5,6 @@
# Copyright (C) 1999, 2000, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: PDB.pm,v 1.36 2005/03/09 04:30:41 christophe Exp $
# A Palm database file (either .pdb or .prc) has the following overall
# structure:
@@ -25,7 +23,7 @@
use vars qw( $VERSION %PDBHandlers %PRCHandlers );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.36 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
=head1 NAME
@@ -1859,9 +1857,17 @@
It may be possible to parse sort blocks further.
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/Palm.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/Palm.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/Palm.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/Palm.pm Tue Sep 22 01:59:19 2009
@@ -5,8 +5,6 @@
# Copyright (C) 1999, 2000, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: Palm.pm,v 1.1 2005/03/09 03:51:22 christophe Exp $
use strict;
use warnings;
@@ -14,7 +12,7 @@
use vars qw( $VERSION );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.1 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
=head1 NAME
@@ -76,9 +74,17 @@
return $name;
}
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/Raw.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/Raw.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/Raw.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/Raw.pm Tue Sep 22 01:59:19 2009
@@ -11,8 +11,6 @@
# Copyright (C) 1999, 2000, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: Raw.pm,v 1.11 2005/03/29 02:46:03 arensb Exp $
use strict;
package Palm::Raw;
@@ -20,7 +18,7 @@
use vars qw( $VERSION @ISA );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.11 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@ISA = qw( Palm::PDB );
@@ -180,9 +178,17 @@
1;
__END__
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/StdAppInfo.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/StdAppInfo.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/StdAppInfo.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/StdAppInfo.pm Tue Sep 22 01:59:19 2009
@@ -5,8 +5,6 @@
# Copyright (C) 1999, 2000, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: StdAppInfo.pm,v 1.20 2004/07/07 02:36:16 christophe Exp $
use strict;
package Palm::StdAppInfo;
@@ -17,7 +15,7 @@
# $error acts like $! in that it reports the error that occurred
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.20 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@ISA = qw( Palm::Raw );
@@ -619,9 +617,17 @@
1;
__END__
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/ToDo.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/ToDo.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/ToDo.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/ToDo.pm Tue Sep 22 01:59:19 2009
@@ -5,8 +5,6 @@
# Copyright (C) 1999, 2000, Andrew Arensburger.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: ToDo.pm,v 1.12 2002/11/07 14:12:10 arensb Exp $
# XXX - Bug: apparently, the first ToDo item shows up with a category
# of "unfiled"
@@ -19,7 +17,7 @@
use vars qw( $VERSION @ISA );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.12 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@ISA = qw( Palm::StdAppInfo Palm::Raw );
@@ -299,9 +297,17 @@
1;
__END__
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Andrew Arensburger E<lt>arensb at ooblick.comE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
Modified: branches/upstream/libpalm-perl/current/lib/ZirePhoto.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libpalm-perl/current/lib/ZirePhoto.pm?rev=44598&op=diff
==============================================================================
--- branches/upstream/libpalm-perl/current/lib/ZirePhoto.pm (original)
+++ branches/upstream/libpalm-perl/current/lib/ZirePhoto.pm Tue Sep 22 01:59:19 2009
@@ -5,9 +5,6 @@
# Copyright (C) 2003, Alessandro Zummo.
# You may distribute this file under the terms of the Artistic
# License, as specified in the README file.
-#
-# $Id: ZirePhoto.pm,v 1.9 2005/07/30 01:37:44 christophe Exp $
-
use strict;
package Palm::ZirePhoto;
@@ -17,7 +14,7 @@
use vars qw( $VERSION @ISA );
# One liner, to allow MakeMaker to work.
-$VERSION = do { my @r = (q$Revision: 1.9 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r };
+$VERSION = '1.011';
@ISA = qw( Palm::StdAppInfo Palm::Raw );
@@ -233,9 +230,17 @@
__END__
+=head1 SOURCE CONTROL
+
+The source is in Github:
+
+ http://github.com/briandfoy/p5-Palm/tree/master
+
=head1 AUTHOR
-Alessandro Zummo E<lt>a.zummo at towertech.itE<gt>
+Alessandro Zummo, C<< <a.zummo at towertech.it> >>
+
+Currently maintained by brian d foy, C<< <bdfoy at cpan.org> >>
=head1 SEE ALSO
More information about the Pkg-perl-cvs-commits
mailing list