From dbcdfeb30011def77f1d861c0cad427befef5d43 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sat, 20 Jun 2015 17:00:52 -0700 Subject: * genman.txr (month-name): Filter removed. Page date is converted to a time value, and later formatted. --- ChangeLog | 5 +++++ genman.txr | 8 +++----- 2 files changed, 8 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index 40a431ca..e0caf5a9 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2015-06-20 Kaz Kylheku + + * genman.txr (month-name): Filter removed. + Page date is converted to a time value, and later formatted. + 2015-06-20 Kaz Kylheku Remove places.h generation hack. diff --git a/genman.txr b/genman.txr index b5c65bbd..687576c4 100644 --- a/genman.txr +++ b/genman.txr @@ -2,10 +2,6 @@ @# and is now part of manutils. @# See here: http://primates.ximian.com/~flucifredi/man/ @# It does not work with that other man2html written in Perl. -@(deffilter month-name - ("01" "Jan") ("02" "Feb") ("03" "Mar") ("04" "Apr") - ("05" "May") ("06" "Jun") ("07" "Jul") ("08" "Aug") - ("09" "Sep") ("10" "Oct") ("11" "Nov") ("12" "Dec")) @(bind txrhash @(hash :equal-based)) @(bind txlhash @(hash :equal-based)) @(bind tgthash txrhash) @@ -13,6 +9,8 @@ Content-type: text/html @(skip 15)

TXR

@(skip)Updated: @YEAR-@MONTH-@DAY
Index +@(bind TIME @(make-time-utc (int-str YEAR) (int-str MONTH) (int-str DAY) + 0 0 0 nil)) @(collect) @PREAMBLE @(until) @@ -69,7 +67,7 @@ This document was created by Manpage for TXR @VERSION

Manpage for TXR @VERSION

-

@{MONTH :filter month-name} @DAY, @YEAR

+

@(time-string-utc TIME "%b %d, %Y")

-- cgit v1.2.3