texlive[43786] Master: chktex support file updates

[commits+karl at tug.org]

Revision: 43786
          http://tug.org/svn/texlive?view=revision&revision=43786
Author:   karl
Date:     2017-04-14 01:32:21 +0200 (Fri, 14 Apr 2017)
Log Message:
-----------
chktex support file updates

Modified Paths:
--------------
    trunk/Master/texmf-dist/chktex/chktexrc
    trunk/Master/texmf-dist/doc/chktex/ChkTeX.pdf
    trunk/Master/texmf-dist/scripts/chktex/deweb.pl
    trunk/Master/tlpkg/doc/releng.txt

Modified: trunk/Master/texmf-dist/chktex/chktexrc
===================================================================
--- trunk/Master/texmf-dist/chktex/chktexrc	2017-04-13 23:16:24 UTC (rev 43785)
+++ trunk/Master/texmf-dist/chktex/chktexrc	2017-04-13 23:32:21 UTC (rev 43786)
@@ -493,6 +493,8 @@
     \citet:*[][]{} \citep:*[][]{} \citealt:*{} \citealp:*[]{} \citeauthor:*{}
     \Citet:*[][]{} \Citep:*[][]{} \Citealt:*{} \Citealp:*[]{} \Citeauthor:{}
     \citetext:{} \citeyear:*{} \citeyearpar:{}
+    # tipa which uses "
+    \textipa:{}
 }
 
 #####################################################################
@@ -545,7 +547,7 @@
 VerbEnvir
 {
     verbatim comment listing verbatimtab rawhtml errexam picture texdraw
-    filecontents pgfpicture tikzpicture
+    filecontents pgfpicture tikzpicture minted lstlisting IPA
 }
 
 #####################################################################

Modified: trunk/Master/texmf-dist/doc/chktex/ChkTeX.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/scripts/chktex/deweb.pl
===================================================================
--- trunk/Master/texmf-dist/scripts/chktex/deweb.pl	2017-04-13 23:16:24 UTC (rev 43785)
+++ trunk/Master/texmf-dist/scripts/chktex/deweb.pl	2017-04-13 23:32:21 UTC (rev 43786)
@@ -26,93 +26,104 @@
 #
 #
 
-print STDERR "DeWEB v1.2 - Copyright 1996 Jens T. Berger Thielemann\n";
+print STDERR "DeWEB v1.3 - Copyright 1996 Jens T. Berger Thielemann\n";
 
 undef $/;
-$texmode = 1;
-$_ = <>;
+my @FILES = @ARGV;
+FILE:
+while( my $file = shift @FILES ) {
 
-while(/\@/)
-{
-    &out($`);
-    $_ = $';
-
-    if(/^@/) {
-	$_ = $';
-	&out('@');
-       	next;
+    my $success = open my $fh, '<', "$file";
+    if ( ! $success ) {
+        print STDERR "Couldn't open file '$file'\n";
+        next FILE;
     }
 
-    if(/^([\s\n])/) {
-	$_ = $';
-	print "\n" if $1 eq "\n";
-	$texmode = 1;
-	next;
-    }
+    $texmode = 1;
+    $_ = <$fh>;
 
-    if(/^[cpd]/i) {
-	$_ = $';
-	$texmode = 0;
-	next;
-    }
+    while (/\@/) {
+        &out($`);
+        $_ = $';
 
-    if(/^\,/i) {
-	$_ = $';
-        print '\,';
-	next;
-    }
+        if (/^@/) {
+            $_ = $';
+            &out('@');
+            next;
+        }
 
-    if(m!^/!) {
-	$_ = $';
-        print '\\\\';
-	next;
-    }
+        if (/^([\s\n])/) {
+            $_ = $';
+            print "\n" if $1 eq "\n";
+            $texmode = 1;
+            next;
+        }
 
-    if(/^[h\&\|\;\#\+]/i || /^i.*/i) {
-	$_ = $';
-	next;
-    }
+        if (/^[cpd]/i) {
+            $_ = $';
+            $texmode = 0;
+            next;
+        }
 
-    if(/^\*[0-9\*]?((.|\n)*?\.)/) {
-	$_ = $';
-	print $1;
-	$texmode = 1;
-	next;
-    }
+        if (/^\,/i) {
+            $_ = $';
+            print '\,';
+            next;
+        }
 
-    if(/^[<(^.t!]((.|\n)*?)\@\>/i) {
-	$_ = $';
-	print '{'.$1.'}';
-	$texmode = 0;
-	next;
-    }
+        if (m!^/!) {
+            $_ = $';
+            print '\\\\';
+            next;
+        }
 
-    if(/^[=]((.|\n)*?)\@\>/) {
-	$_ = $';
-	print &printnl($1);
-	next;
-    }
+        if (/^[h\&\|\;\#\+]/i || /^i.*/i) {
+            $_ = $';
+            next;
+        }
 
-    if(/^[fsl](\s+\S+\s+\S+)|^\'(.|\n)*?\'|^\[((.|\n)*?)\@\]/i) {
-	$_ = $';
-	print &printnl($+);
-	next;
+        if (/^\*[0-9\*]?((.|\n)*?\.)/) {
+            $_ = $';
+            print $1;
+            $texmode = 1;
+            next;
+        }
+
+        if (/^[<(^.t!]((.|\n)*?)\@\>/i) {
+            $_ = $';
+            print '{'.$1.'}';
+            $texmode = 0;
+            next;
+        }
+
+        if (/^[=]((.|\n)*?)\@\>/) {
+            $_ = $';
+            print &printnl($1);
+            next;
+        }
+
+        if (/^[fsl](\s+\S+\s+\S+)|^\'(.|\n)*?\'|^\[((.|\n)*?)\@\]/i) {
+            $_ = $';
+            print &printnl($+);
+            next;
+        }
+
+        @line = split(/\n/, $_, 2);
+        print STDERR "Unknown opcode, ignored. Buffer:\n$line[0]\n";
+
     }
 
-    @line = split(/\n/, $_, 2);
-    print STDERR "Unknown opcode, ignored. Buffer:\n$line[0]\n";
+    print $_;
 
 }
 
-print $_;
-
 sub printnl {
     my($foo);
-    if(defined $_[0]) {
-	$foo = $_[0];
-	$foo =~ s/.//g;
+    if (defined $_[0]) {
+        $foo = $_[0];
+        $foo =~ s/.//g;
     } else {
-	$foo = "";
+        $foo = "";
     }
     $foo;
 }

Modified: trunk/Master/tlpkg/doc/releng.txt
===================================================================
--- trunk/Master/tlpkg/doc/releng.txt	2017-04-13 23:16:24 UTC (rev 43785)
+++ trunk/Master/tlpkg/doc/releng.txt	2017-04-13 23:32:21 UTC (rev 43786)
@@ -78,8 +78,10 @@
     Build/source/inst/texmf-dist Master/texmf-dist
 for p in *conv hbf2gf; do cp /home/ftp/mirror/rsync.tex.ac.uk/CTAN/language/chinese/CJK/cjk-4.8.4/doc/pdf/$p.pdf $p; done
 
-8. Now, ready to do first update of tlpretest:
+8. Now, try a first update of tlpretest:
   force_rebuild=true cron.tl
+This will fail because pretest is not set up, but that's ok; the idea is
+to check the output and ensure all is as basically ok.
 
 9. After first successful pretest build, do
 recreate=--recreate  # just once! to get catalogue updates.