summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2022-08-29 20:00:05 +0000
committerKarl Berry <karl@freefriends.org>2022-08-29 20:00:05 +0000
commit3112b258daa16ced26a6acaae6e240f2820d82d2 (patch)
treede29c127874276b9e5d838e9963da25f87f284cb
parent30dbf0e69a99da34c828008e0d09629c5672a04f (diff)
pedigree-perl (29aug22)
git-svn-id: svn://tug.org/texlive/trunk@64227 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-xBuild/source/texk/texlive/linked_scripts/pedigree-perl/pedigree.pl22
-rw-r--r--Master/texmf-dist/doc/man/man1/pedigree.16
-rw-r--r--Master/texmf-dist/doc/man/man1/pedigree.man1.pdfbin21645 -> 20197 bytes
-rw-r--r--Master/texmf-dist/doc/support/pedigree-perl/NEWS4
-rw-r--r--Master/texmf-dist/doc/support/pedigree-perl/README4
-rwxr-xr-xMaster/texmf-dist/scripts/pedigree-perl/pedigree.pl22
-rw-r--r--Master/texmf-dist/source/latex/pedigree-perl/Makefile4
7 files changed, 35 insertions, 27 deletions
diff --git a/Build/source/texk/texlive/linked_scripts/pedigree-perl/pedigree.pl b/Build/source/texk/texlive/linked_scripts/pedigree-perl/pedigree.pl
index d5cc70a4e99..fafa24c622e 100755
--- a/Build/source/texk/texlive/linked_scripts/pedigree-perl/pedigree.pl
+++ b/Build/source/texk/texlive/linked_scripts/pedigree-perl/pedigree.pl
@@ -1,6 +1,6 @@
#!/usr/bin/env perl
#
-# Copyright (C) 2006-2021 Boris Veytsman & Leila Akhmadeeva
+# Copyright (C) 2006-2022 Boris Veytsman & Leila Akhmadeeva
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -92,7 +92,7 @@ Pedigree::MarriageNode(3), Pedigree::Area(3).
=head1 AUTHOR
-Boris Veytsman, Leila Akhmadeeva, 2006-2021
+Boris Veytsman, Leila Akhmadeeva, 2006-2022
=cut
@@ -111,12 +111,14 @@ use vars qw($opt_c $opt_d $opt_o $opt_s $opt_v);
my $TLMaster; # Where TeXlive is
my $TLCONF; # TL config file
my $TLCONFLOCAL; # TL local config file
-chomp($TLMaster = `kpsewhich -var-value=TEXMFROOT`);
-if (length($TLMaster)) {
- unshift @INC, "$TLMaster/texmf-dist/scripts/pedigree-perl";
- $TLCONF = "$TLMaster/texmf-config/pedigree/pedigree.cfg";
- chomp($TLCONFLOCAL = `kpsewhich -var-value=TEXMFLOCAL`);
- $TLCONFLOCAL .= "/pedigree/pedigree.cfg";
+BEGIN {
+ chomp($TLMaster = `kpsewhich -var-value=TEXMFROOT`);
+ if (length($TLMaster)) {
+ unshift @INC, "$TLMaster/texmf-dist/scripts/pedigree-perl";
+ $TLCONF = "$TLMaster/texmf-config/pedigree/pedigree.cfg";
+ chomp($TLCONFLOCAL = `kpsewhich -var-value=TEXMFLOCAL`);
+ $TLCONFLOCAL .= "/pedigree/pedigree.cfg";
+ }
}
use Getopt::Std;
@@ -129,9 +131,9 @@ use Pedigree;
my $USAGE="Usage: $0 [-c configuration_file] [-d] [-o output_file] [-s start_id] input_file\n";
my $COPYRIGHT=<<END;
-$0 Version 0.5, October 2021
+$0 Version 2.1, August 2022
-Copyright (C) 2006-2021 Boris Veytsman & Leila Akhmadeeva
+Copyright (C) 2006-2022 Boris Veytsman & Leila Akhmadeeva
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
diff --git a/Master/texmf-dist/doc/man/man1/pedigree.1 b/Master/texmf-dist/doc/man/man1/pedigree.1
index 68daf7209f4..060d2232224 100644
--- a/Master/texmf-dist/doc/man/man1/pedigree.1
+++ b/Master/texmf-dist/doc/man/man1/pedigree.1
@@ -1,4 +1,4 @@
-.\" Automatically generated by Pod::Man 4.14 (Pod::Simple 3.40)
+.\" Automatically generated by Pod::Man 4.11 (Pod::Simple 3.35)
.\"
.\" Standard preamble:
.\" ========================================================================
@@ -133,7 +133,7 @@
.\" ========================================================================
.\"
.IX Title "pedigree 1"
-.TH pedigree 1 "2021-10-02" "perl v5.18.4" "User Contributed Perl Documentation"
+.TH pedigree 1 "2022-08-29" "perl v5.30.3" "User Contributed Perl Documentation"
.\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
@@ -190,4 +190,4 @@ The library functions are described in \fBPedigree::Language\fR\|(3),
\&\fBPedigree::MarriageNode\fR\|(3), \fBPedigree::Area\fR\|(3).
.SH "AUTHOR"
.IX Header "AUTHOR"
-Boris Veytsman, Leila Akhmadeeva, 2006\-2021
+Boris Veytsman, Leila Akhmadeeva, 2006\-2022
diff --git a/Master/texmf-dist/doc/man/man1/pedigree.man1.pdf b/Master/texmf-dist/doc/man/man1/pedigree.man1.pdf
index 7b0dca867da..ec5833e7a3c 100644
--- a/Master/texmf-dist/doc/man/man1/pedigree.man1.pdf
+++ b/Master/texmf-dist/doc/man/man1/pedigree.man1.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/support/pedigree-perl/NEWS b/Master/texmf-dist/doc/support/pedigree-perl/NEWS
index d2fb137fd92..4882a80ef71 100644
--- a/Master/texmf-dist/doc/support/pedigree-perl/NEWS
+++ b/Master/texmf-dist/doc/support/pedigree-perl/NEWS
@@ -1,5 +1,9 @@
pedigree NEWS: History of user interface changes
+Changes in v2.1, 2022/08/28
+
+* Moved initialization to BEGIN block (suggested by Norbert Preining)
+
Changes in v2.0, 2021/10/02
* Moved from SELFAUTOPARENT to TEXMFROOT for better packaging
diff --git a/Master/texmf-dist/doc/support/pedigree-perl/README b/Master/texmf-dist/doc/support/pedigree-perl/README
index d783c5640ac..77e045a5d0e 100644
--- a/Master/texmf-dist/doc/support/pedigree-perl/README
+++ b/Master/texmf-dist/doc/support/pedigree-perl/README
@@ -1,6 +1,6 @@
A Program for Generation TeX Pedigrees From CSV Files
Boris Veytsman & Leila Akhmadeeva
- Version 2.0, October 2021
+ Version 2.1, August 2022
This program generates TeX commands to typeset pedigrees - either TeX
fragments of full LaTeX files. It has support for multilanguage
@@ -23,7 +23,7 @@ For manual installation:
3. Optionally install man pages & documentation.
-Copyright 2006-2021, Boris Veytsman <borisv@lk.net>, Leila Akhmadeeva
+Copyright 2006-2022, Boris Veytsman <borisv@lk.net>, Leila Akhmadeeva
This work may be distributed and/or modified under the conditions of
the GNU Public License, either version 2 of this license or (at your
diff --git a/Master/texmf-dist/scripts/pedigree-perl/pedigree.pl b/Master/texmf-dist/scripts/pedigree-perl/pedigree.pl
index d5cc70a4e99..fafa24c622e 100755
--- a/Master/texmf-dist/scripts/pedigree-perl/pedigree.pl
+++ b/Master/texmf-dist/scripts/pedigree-perl/pedigree.pl
@@ -1,6 +1,6 @@
#!/usr/bin/env perl
#
-# Copyright (C) 2006-2021 Boris Veytsman & Leila Akhmadeeva
+# Copyright (C) 2006-2022 Boris Veytsman & Leila Akhmadeeva
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -92,7 +92,7 @@ Pedigree::MarriageNode(3), Pedigree::Area(3).
=head1 AUTHOR
-Boris Veytsman, Leila Akhmadeeva, 2006-2021
+Boris Veytsman, Leila Akhmadeeva, 2006-2022
=cut
@@ -111,12 +111,14 @@ use vars qw($opt_c $opt_d $opt_o $opt_s $opt_v);
my $TLMaster; # Where TeXlive is
my $TLCONF; # TL config file
my $TLCONFLOCAL; # TL local config file
-chomp($TLMaster = `kpsewhich -var-value=TEXMFROOT`);
-if (length($TLMaster)) {
- unshift @INC, "$TLMaster/texmf-dist/scripts/pedigree-perl";
- $TLCONF = "$TLMaster/texmf-config/pedigree/pedigree.cfg";
- chomp($TLCONFLOCAL = `kpsewhich -var-value=TEXMFLOCAL`);
- $TLCONFLOCAL .= "/pedigree/pedigree.cfg";
+BEGIN {
+ chomp($TLMaster = `kpsewhich -var-value=TEXMFROOT`);
+ if (length($TLMaster)) {
+ unshift @INC, "$TLMaster/texmf-dist/scripts/pedigree-perl";
+ $TLCONF = "$TLMaster/texmf-config/pedigree/pedigree.cfg";
+ chomp($TLCONFLOCAL = `kpsewhich -var-value=TEXMFLOCAL`);
+ $TLCONFLOCAL .= "/pedigree/pedigree.cfg";
+ }
}
use Getopt::Std;
@@ -129,9 +131,9 @@ use Pedigree;
my $USAGE="Usage: $0 [-c configuration_file] [-d] [-o output_file] [-s start_id] input_file\n";
my $COPYRIGHT=<<END;
-$0 Version 0.5, October 2021
+$0 Version 2.1, August 2022
-Copyright (C) 2006-2021 Boris Veytsman & Leila Akhmadeeva
+Copyright (C) 2006-2022 Boris Veytsman & Leila Akhmadeeva
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
diff --git a/Master/texmf-dist/source/latex/pedigree-perl/Makefile b/Master/texmf-dist/source/latex/pedigree-perl/Makefile
index 446d533238e..75381ec7508 100644
--- a/Master/texmf-dist/source/latex/pedigree-perl/Makefile
+++ b/Master/texmf-dist/source/latex/pedigree-perl/Makefile
@@ -1,6 +1,6 @@
#
# Makefile for pedigree
-# $Id: Makefile,v 2.2 2007-07-29 19:52:51 boris Exp $
+# $Id: Makefile,v 2.3 2022/08/29 03:04:29 boris Exp $
#
# This file is in public domain
#
@@ -54,4 +54,4 @@ distclean: clean
# Archive for the distribution. Includes typeset documentation and man pages
#
archive: all docs clean
- tar -czvf pedigree.tgz --exclude '*~' --exclude '*.tgz' --exclude CVS .
+ COPYFILE_DISABLE=1 tar -czvf pedigree.tgz --exclude '*~' --exclude '*.tgz' --exclude CVS .