From 55c6d66f61a96ba63cd8c141229843ad2ab42632 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Tue, 24 Nov 2020 03:01:06 +0000 Subject: CTAN sync 202011240301 --- graphics/asymptote/doc/FAQ/asy-faq.bfnn | 4 ++-- graphics/asymptote/doc/FAQ/asy-faq.info | 2 +- graphics/asymptote/doc/FAQ/bfnnconv.pl | 6 +++++- graphics/asymptote/doc/FAQ/m-html.pl | 11 +++++++---- 4 files changed, 15 insertions(+), 8 deletions(-) (limited to 'graphics/asymptote/doc/FAQ') diff --git a/graphics/asymptote/doc/FAQ/asy-faq.bfnn b/graphics/asymptote/doc/FAQ/asy-faq.bfnn index 927d4c753d..a4dc8a0965 100644 --- a/graphics/asymptote/doc/FAQ/asy-faq.bfnn +++ b/graphics/asymptote/doc/FAQ/asy-faq.bfnn @@ -9,7 +9,7 @@ \set title Asymptote Frequently Asked Questions \copyto ASCII ASYMPTOTE FREQUENTLY ASKED QUESTIONS - `date '+%d %h %Y'` + `%perl use POSIX; POSIX::strftime("%Y-%m-%d", gmtime($ENV{SOURCE_DATE_EPOCH} || time))` \endcopy \copyto INFO @@ -22,7 +22,7 @@ END-INFO-DIR-ENTRY File: asy-faq.info, Node: Top, Next: Question 1.1, Up: (dir) ASYMPTOTE FREQUENTLY ASKED QUESTIONS - `date '+%d %h %Y'` + `%perl use POSIX; POSIX::strftime("%Y-%m-%d", gmtime($ENV{SOURCE_DATE_EPOCH} || time))` \endcopy diff --git a/graphics/asymptote/doc/FAQ/asy-faq.info b/graphics/asymptote/doc/FAQ/asy-faq.info index c39a3a8263..bef48f5f9b 100644 --- a/graphics/asymptote/doc/FAQ/asy-faq.info +++ b/graphics/asymptote/doc/FAQ/asy-faq.info @@ -10,7 +10,7 @@ END-INFO-DIR-ENTRY File: asy-faq.info, Node: Top, Next: Question 1.1, Up: (dir) ASYMPTOTE FREQUENTLY ASKED QUESTIONS - 05 Aug 2020 + 2020-11-23 This is the list of Frequently Asked Questions about Asymptote (asy). diff --git a/graphics/asymptote/doc/FAQ/bfnnconv.pl b/graphics/asymptote/doc/FAQ/bfnnconv.pl index 0a705e2c68..35a636b55e 100755 --- a/graphics/asymptote/doc/FAQ/bfnnconv.pl +++ b/graphics/asymptote/doc/FAQ/bfnnconv.pl @@ -135,7 +135,11 @@ while (<>) { m/([^\\])\`/ || warn "`$_'"; $_= $'; $cmd= $`.$1; - $it= `$cmd`; chop $it; + if($cmd =~ s/^%perl //) { + $it= eval($cmd); + } else { + $it= `$cmd`; chop $it; + } print $fh $it; } print $fh $_; diff --git a/graphics/asymptote/doc/FAQ/m-html.pl b/graphics/asymptote/doc/FAQ/m-html.pl index 75b8ccc38f..77cc257504 100644 --- a/graphics/asymptote/doc/FAQ/m-html.pl +++ b/graphics/asymptote/doc/FAQ/m-html.pl @@ -22,6 +22,8 @@ # by the GPL. However, I would appreciate it if you credited me if # appropriate in any documents you format using BFNN.) +use POSIX; + %saniarray= ('<','lt', '>','gt', '&','amp', '"','quot'); sub html_init { @@ -34,8 +36,9 @@ sub html_init { print HTML "\n"; $html_needpara= -1; $html_end=''; - chop($html_date=`date '+%d %B %Y'`); - chop($html_year=`date '+%Y'`); + my $epoch=$ENV{SOURCE_DATE_EPOCH} || time; + $html_date=POSIX::strftime("%Y-%m-%d", gmtime($epoch)); + $html_year=POSIX::strftime("%Y", gmtime($epoch)); } sub html_startup { @@ -50,9 +53,9 @@ $user_title content="Frequently asked questions and answers (FAQ) for Asymptote."> + href="https://asymptote.sourceforge.io"> + href="https://asymptote.sourceforge.io/doc/">

$user_title

-- cgit v1.2.3