From 19cabf5a472cd83e67ad54b02cae39d353d1a050 Mon Sep 17 00:00:00 2001 From: Mischa POSLAWSKY Date: Fri, 19 Jan 2024 22:45:25 +0100 Subject: [PATCH] sitemap: keyboard/altgr modification dates from includes --- tools/mksitemap | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/tools/mksitemap b/tools/mksitemap index 8d1dfb7..ce2ce87 100755 --- a/tools/mksitemap +++ b/tools/mksitemap @@ -2,7 +2,7 @@ use 5.014; use warnings; -our $VERSION = '1.02'; +our $VERSION = '1.03'; use File::stat; use Time::Piece; @@ -20,6 +20,7 @@ my @pages = ( apl less screen digits sc/bw sc/hots termcol/legacy mplayer keyboard/altgr/macos-abc keyboard/altgr/msx keyboard/altgr/ukext keyboard/altgr/eurkey keyboard/altgr/apl keyboard/altgr/spacecadet + keyboard/altgr/ipa )], [qw( chars/table/html sample source plan )], ); @@ -39,8 +40,13 @@ for my $group (@pages) { state $prio = 1; for my $file (@{$group}) { (my $page = $file) =~ s/\Aindex\z//; - $file =~ s{/.*}{}; - $file .= '.plp'; + if (-e "$file.eng.inc.pl") { + $file .= '.eng.inc.pl'; + } + else { + $file =~ s{/.*}{}; + $file .= '.plp'; + } my $stat = stat $file or do { warn "missing file $file\n"; next; -- 2.30.0