Commit 11e867bb835c76e632200695ebc3f367e9b9e2f6 - libdate-jd-perl

+0

-4

~~.cvsignore~~ less more

0		Build Makefile
1		_build blib
2		META.json META.yml MYMETA.json MYMETA.yml Makefile.PL SIGNATURE
3		Date-JD-*

+11

-0

.gitignore less more

	0	/Build
	1	/Makefile
	2	/_build
	3	/blib
	4	/META.json
	5	/META.yml
	6	/MYMETA.json
	7	/MYMETA.yml
	8	/Makefile.PL
	9	/SIGNATURE
	10	/Date-JD-*

+10

-1

Build.PL less more

32	32	},
33	33	dynamic_config => 0,
34	34	meta_add => { distribution_type => "module" },
35		create_makefile_pl => "passthrough",
	35	meta_merge => {
	36	"meta-spec" => { version => "2" },
	37	resources => {
	38	bugtracker => {
	39	mailto => "bug-Date-JD\@rt.cpan.org",
	40	web => "https://rt.cpan.org/Public/Dist/".
	41	"Display.html?Name=Date-JD",
	42	},
	43	},
	44	},
36	45	sign => 1,
37	46	)->create_build_script;
38	47

+13

-0

Changes less more

	0	version 0.006; 2017-07-30
	1
	2	* no longer include a Makefile.PL in the distribution
	3
	4	* in documentation, use four-column indentation for all verbatim
	5	material
	6
	7	* in META.{yml,json}, point to public bug tracker
	8
	9	* remove a couple of unused variables from the code
	10
	11	* convert .cvsignore to .gitignore
	12
0	13	version 0.005; 2011-07-17
1	14
2	15	* introduce new conversion functions _to_nn and _to_nf, which

+1

-2

MANIFEST less more

0		.cvsignore
	0	.gitignore
1	1	Build.PL
2	2	Changes
3	3	MANIFEST
4	4	META.json
5	5	META.yml
6		Makefile.PL
7	6	README
8	7	lib/Date/JD.pm
9	8	t/d2d.t

+22

-17

META.json less more

3	3	"Andrew Main (Zefram) <zefram@fysh.org>"
4	4	],
5	5	"dynamic_config" : 0,
6		"generated_by" : "Module::Build version 0.38, CPAN::Meta::Converter version 2.110930001",
	6	"generated_by" : "Module::Build version 0.4224",
7	7	"license" : [
8	8	"perl_5"
9	9	],
10	10	"meta-spec" : {
11	11	"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
12		"version" : "2"
	12	"version" : 2
13	13	},
14	14	"name" : "Date-JD",
15	15	"prereqs" : {
16	16	"build" : {
17	17	"requires" : {
18		"Module::Build" : 0,
19		"Test::More" : 0,
	18	"Module::Build" : "0",
	19	"Test::More" : "0",
20	20	"perl" : "5.006",
21		"strict" : 0,
22		"warnings" : 0
	21	"strict" : "0",
	22	"warnings" : "0"
23	23	}
24	24	},
25	25	"configure" : {
26	26	"requires" : {
27		"Module::Build" : 0,
	27	"Module::Build" : "0",
28	28	"perl" : "5.006",
29		"strict" : 0,
30		"warnings" : 0
	29	"strict" : "0",
	30	"warnings" : "0"
31	31	}
32	32	},
33	33	"runtime" : {
34	34	"conflicts" : {
35		"Math::BigRat" : 0
	35	"Math::BigRat" : "< 0.13"
36	36	},
37	37	"requires" : {
38		"Carp" : 0,
39		"Exporter" : 0,
40		"parent" : 0,
	38	"Carp" : "0",
	39	"Exporter" : "0",
	40	"parent" : "0",
41	41	"perl" : "5.006",
42		"strict" : 0,
43		"warnings" : 0
	42	"strict" : "0",
	43	"warnings" : "0"
44	44	}
45	45	}
46	46	},
47	47	"provides" : {
48	48	"Date::JD" : {
49	49	"file" : "lib/Date/JD.pm",
50		"version" : "0.005"
	50	"version" : "0.006"
51	51	}
52	52	},
53	53	"release_status" : "stable",
54	54	"resources" : {
	55	"bugtracker" : {
	56	"mailto" : "bug-Date-JD@rt.cpan.org",
	57	"web" : "https://rt.cpan.org/Public/Dist/Display.html?Name=Date-JD"
	58	},
55	59	"license" : [
56	60	"http://dev.perl.org/licenses/"
57	61	]
58	62	},
59		"version" : "0.005"
	63	"version" : "0.006",
	64	"x_serialization_backend" : "JSON::PP version 2.93"
60	65	}

+22

-20

META.yml less more

2	2	author:
3	3	- 'Andrew Main (Zefram) <zefram@fysh.org>'
4	4	build_requires:
5		Module::Build: 0
6		Test::More: 0
7		perl: 5.006
8		strict: 0
9		warnings: 0
	5	Module::Build: '0'
	6	Test::More: '0'
	7	perl: '5.006'
	8	strict: '0'
	9	warnings: '0'
10	10	configure_requires:
11		Module::Build: 0
12		perl: 5.006
13		strict: 0
14		warnings: 0
	11	Module::Build: '0'
	12	perl: '5.006'
	13	strict: '0'
	14	warnings: '0'
15	15	conflicts:
16		Math::BigRat: 0
	16	Math::BigRat: '< 0.13'
17	17	dynamic_config: 0
18		generated_by: 'Module::Build version 0.38, CPAN::Meta::Converter version 2.110930001'
	18	generated_by: 'Module::Build version 0.4224, CPAN::Meta::Converter version 2.150010'
19	19	license: perl
20	20	meta-spec:
21	21	url: http://module-build.sourceforge.net/META-spec-v1.4.html
22		version: 1.4
	22	version: '1.4'
23	23	name: Date-JD
24	24	provides:
25	25	Date::JD:
26	26	file: lib/Date/JD.pm
27		version: 0.005
	27	version: '0.006'
28	28	requires:
29		Carp: 0
30		Exporter: 0
31		parent: 0
32		perl: 5.006
33		strict: 0
34		warnings: 0
	29	Carp: '0'
	30	Exporter: '0'
	31	parent: '0'
	32	perl: '5.006'
	33	strict: '0'
	34	warnings: '0'
35	35	resources:
	36	bugtracker: https://rt.cpan.org/Public/Dist/Display.html?Name=Date-JD
36	37	license: http://dev.perl.org/licenses/
37		version: 0.005
	38	version: '0.006'
	39	x_serialization_backend: 'CPAN::Meta::YAML version 0.012'

+0

-35

~~Makefile.PL~~ less more

0		# Note: this file was auto-generated by Module::Build::Compat version 0.3800
1		require 5.006;
2
3		unless (eval "use Module::Build::Compat 0.02; 1" ) {
4		print "This module requires Module::Build to install itself.\n";
5
6		require ExtUtils::MakeMaker;
7		my $yn = ExtUtils::MakeMaker::prompt
8		(' Install Module::Build now from CPAN?', 'y');
9
10		unless ($yn =~ /^y/i) {
11		die " *** Cannot install without Module::Build. Exiting ...\n";
12		}
13
14		require Cwd;
15		require File::Spec;
16		require CPAN;
17
18		# Save this 'cause CPAN will chdir all over the place.
19		my $cwd = Cwd::cwd();
20
21		CPAN::Shell->install('Module::Build::Compat');
22		CPAN::Shell->expand("Module", "Module::Build::Compat")->uptodate
23		or die "Couldn't install Module::Build, giving up.\n";
24
25		chdir $cwd or die "Cannot chdir() back to $cwd: $!";
26		}
27		eval "use Module::Build::Compat 0.02; 1" or die $@;
28
29		Module::Build::Compat->run_build_pl(args => \@ARGV);
30		my $build_script = 'Build';
31		$build_script .= '.com' if $^O eq 'VMS';
32		exit(0) unless(-e $build_script); # cpantesters convention
33		require Module::Build;
34		Module::Build::Compat->write_makefile(build_class => 'Module::Build');

+1

-1

README less more

41	41
42	42	COPYRIGHT
43	43
44		Copyright (C) 2006, 2007, 2009, 2010, 2011
	44	Copyright (C) 2006, 2007, 2009, 2010, 2011, 2017
45	45	Andrew Main (Zefram) <zefram@fysh.org>
46	46
47	47	LICENSE

+13

-14

SIGNATURE less more

0	0	This file contains message digests of all files listed in MANIFEST,
1		signed via the Module::Signature module, version 0.68.
	1	signed via the Module::Signature module, version 0.81.
2	2
3	3	To verify the content in this distribution, first make sure you have
4	4	Module::Signature installed, then type:

13	13	-----BEGIN PGP SIGNED MESSAGE-----
14	14	Hash: SHA1
15	15
16		SHA1 4be5f8efa98273bce0a3a73e55da2f7849083a94 .cvsignore
17		SHA1 7e5c8ada474e0e74100e84808da3a91d3edfeced Build.PL
18		SHA1 72a34179a578636733543d6b6d9e9c66b9f1c43a Changes
19		SHA1 6d843cace73bb865bfd6971e0a9df746d114d5dc MANIFEST
20		SHA1 9c7302d547c86dc60b0e304e8defd36f7c9d27d6 META.json
21		SHA1 d19abca6686f0fc1c7da7ce18de6f996099e2832 META.yml
22		SHA1 a4df8e97ccd390a42212af5a9f4d0986c85e7a5f Makefile.PL
23		SHA1 a33b9d6c6232c444e2dfa56487c8757b3d334599 README
24		SHA1 de34f0dd3d8c047dd51fcadfb4eeb8b639eb8046 lib/Date/JD.pm
	16	SHA1 182459a71a7ee215418f2590d38a761a2884275c .gitignore
	17	SHA1 dcdf941014ddbc190800e64f8d707acea9de82d0 Build.PL
	18	SHA1 98b24002d6fa0687b1a559b181997e0c05f7cd21 Changes
	19	SHA1 592b76a5d68c99ac1fb440a9b7ce372dfd8cae9c MANIFEST
	20	SHA1 82945e315074e4ae68a31b71dae3ed708ea9b29d META.json
	21	SHA1 e0ab0142d996ae5d09becc3698f9f282df2d0039 META.yml
	22	SHA1 0cc4dc79723fcefc070543be3c6f35336812a6d3 README
	23	SHA1 967dc21def4e401fce49dd8bdd1a49a9ec55b506 lib/Date/JD.pm
25	24	SHA1 f9b6517f8c0f2271a495bfe01891f2663e18cf43 t/d2d.t
26	25	SHA1 904d9a4f76525e2303e4b0c168c68230f223c8de t/pod_cvg.t
27	26	SHA1 65c75abdef6f01a5d1588a307f2ddfe2333dc961 t/pod_syn.t
28	27	-----BEGIN PGP SIGNATURE-----
29		Version: GnuPG v1.4.10 (GNU/Linux)
	28	Version: GnuPG v1
30	29
31		iEYEARECAAYFAk4i5MMACgkQOV9mt2VyAVF50ACgidybwOjnoR4yrQdjBmMGupxJ
32		yvMAn1rmVojMTPJqVRf5L/xEt7WXXLjr
33		=3YOZ
	30	iEYEARECAAYFAll9vIcACgkQOV9mt2VyAVGKTgCdGOm58OrrUjfDO9OLDUAgIGgQ
	31	ElkAn2+X63JboqkvyZDgc1z3+B6qAJfn
	32	=SFeV
34	33	-----END PGP SIGNATURE-----

+9

-11

lib/Date/JD.pm less more

3	3
4	4	=head1 SYNOPSIS
5	5
6		use Date::JD qw(jd_to_mjd mjd_to_cjdnf cjdn_to_rd);
7
8		$mjd = jd_to_mjd($jd);
9		($cjdn, $cjdf) = mjd_to_cjdnf($mjd, $tz);
10		$rd = cjdn_to_rd($cjdn, $cjdf);
11
12		# and 509 other conversion functions
	6	use Date::JD qw(jd_to_mjd mjd_to_cjdnf cjdn_to_rd);
	7
	8	$mjd = jd_to_mjd($jd);
	9	($cjdn, $cjdf) = mjd_to_cjdnf($mjd, $tz);
	10	$rd = cjdn_to_rd($cjdn, $cjdf);
	11
	12	# and 509 other conversion functions
13	13
14	14	=head1 DESCRIPTION
15	15

176	176
177	177	use Carp qw(croak);
178	178
179		our $VERSION = "0.005";
	179	our $VERSION = "0.006";
180	180
181	181	use parent "Exporter";
182	182	our @EXPORT_OK;

1351	1351	}
1352	1352
1353	1353	sub _ret_dn($) {
1354		my $dn = &_ret_dnn;
1355	1354	return wantarray ? &_ret_dnf : &_ret_dnn;
1356	1355	}
1357	1356

1359	1358	my $ediff = $jd_flavours{$src}->{epoch_jd} -
1360	1359	$jd_flavours{$dst}->{epoch_jd};
1361	1360	my $ediffh = $ediff == int($ediff) ? 0 : 0.5;
1362		my $ediffi = $ediff - $ediffh;
1363	1361	my $src_zone = !!$jd_flavours{$src}->{zone};
1364	1362	my $dst_zone = !!$jd_flavours{$dst}->{zone};
1365	1363	my($zp, $z1, $z2);

1429	1427
1430	1428	=head1 COPYRIGHT
1431	1429
1432		Copyright (C) 2006, 2007, 2009, 2010, 2011
	1430	Copyright (C) 2006, 2007, 2009, 2010, 2011, 2017
1433	1431	Andrew Main (Zefram) <zefram@fysh.org>
1434	1432
1435	1433	=head1 LICENSE