texlive[59240] trunk: musixtex (17may21)

commits+karl at tug.org commits+karl at tug.org
Mon May 17 22:40:09 CEST 2021


Revision: 59240
          http://tug.org/svn/texlive?view=revision&revision=59240
Author:   karl
Date:     2021-05-17 22:40:09 +0200 (Mon, 17 May 2021)
Log Message:
-----------
musixtex (17may21)

Modified Paths:
--------------
    trunk/Build/source/texk/texlive/linked_scripts/texlive/fmtutil.pl
    trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl
    trunk/Master/texmf-dist/doc/generic/musixtex/README
    trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/beams.tex
    trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/extensions.tex
    trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/frontmatter.tex
    trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/musixdoc.sty
    trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc.pdf
    trunk/Master/texmf-dist/tex/generic/musixtex/musixvbm.tex

Added Paths:
-----------
    trunk/Master/texmf-dist/scripts/musixtex/musixflx.bat
    trunk/Master/texmf-dist/scripts/musixtex/musixtex.bat

Modified: trunk/Build/source/texk/texlive/linked_scripts/texlive/fmtutil.pl
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/texlive/fmtutil.pl	2021-05-17 20:38:21 UTC (rev 59239)
+++ trunk/Build/source/texk/texlive/linked_scripts/texlive/fmtutil.pl	2021-05-17 20:40:09 UTC (rev 59240)
@@ -1,5 +1,5 @@
 #!/usr/bin/env perl
-# $Id: fmtutil.pl 59143 2021-05-09 02:23:44Z preining $
+# $Id: fmtutil.pl 59207 2021-05-15 13:58:40Z preining $
 # fmtutil - utility to maintain format files.
 # (Maintained in TeX Live:Master/texmf-dist/scripts/texlive.)
 # 
@@ -24,11 +24,11 @@
   TeX::Update->import();
 }
 
-my $svnid = '$Id: fmtutil.pl 59143 2021-05-09 02:23:44Z preining $';
-my $lastchdate = '$Date: 2021-05-09 04:23:44 +0200 (Sun, 09 May 2021) $';
+my $svnid = '$Id: fmtutil.pl 59207 2021-05-15 13:58:40Z preining $';
+my $lastchdate = '$Date: 2021-05-15 15:58:40 +0200 (Sat, 15 May 2021) $';
 $lastchdate =~ s/^\$Date:\s*//;
 $lastchdate =~ s/ \(.*$//;
-my $svnrev = '$Revision: 59143 $';
+my $svnrev = '$Revision: 59207 $';
 $svnrev =~ s/^\$Revision:\s*//;
 $svnrev =~ s/\s*\$$//;
 my $version = "r$svnrev ($lastchdate)";
@@ -616,7 +616,7 @@
 sub check_and_warn_on_user_format {
   my ($fmt, $eng) = @_;
   # do nothing if we are updating files in $TEXMFVAR
-  return if ($opts{'fmtdir'} eq $TEXMFVAR);
+  return if ($opts{'fmtdir'} eq "$TEXMFVAR/web2c");
   my $saved_fmtdir = $opts{'fmtdir'};
   $opts{'fmtdir'} = "$TEXMFVAR/web2c";
   my ($kpsefmt, $destdir, $fmtfile, $logfile) = compute_format_destination($fmt, $eng);

Modified: trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl	2021-05-17 20:38:21 UTC (rev 59239)
+++ trunk/Build/source/texk/texlive/linked_scripts/texlive/tlmgr.pl	2021-05-17 20:40:09 UTC (rev 59240)
@@ -1,12 +1,12 @@
 #!/usr/bin/env perl
-# $Id: tlmgr.pl 59154 2021-05-09 22:00:07Z karl $
+# $Id: tlmgr.pl 59208 2021-05-15 17:45:58Z karl $
 #
 # Copyright 2008-2021 Norbert Preining
 # This file is licensed under the GNU General Public License version 2
 # or any later version.
 
-my $svnrev = '$Revision: 59154 $';
-my $datrev = '$Date: 2021-05-10 00:00:07 +0200 (Mon, 10 May 2021) $';
+my $svnrev = '$Revision: 59208 $';
+my $datrev = '$Date: 2021-05-15 19:45:58 +0200 (Sat, 15 May 2021) $';
 my $tlmgrrevision;
 my $tlmgrversion;
 my $prg;
@@ -5653,17 +5653,20 @@
     }
     # special case for koma-script where doc/src files are in runfiles section
     if ($tlpn eq "koma-script") {
-      @files = grep {!m;^texmf-dist/source/latex/koma-script/;} @files;
-      @files = grep {!m;^texmf-dist/doc/latex/koma-script/;} @files;
+      @files = grep { !m;^texmf-dist/source/latex/koma-script/; } @files;
+      @files = grep { !m;^texmf-dist/doc/latex/koma-script/; } @files;
     }
     push @runtime_files, @files;
   }
 
-  # build the duplicates list.
+  # build the duplicates list; only one duplicate in list, no matter how
+  # many clashing files there actually are.
   my @duplicates = (""); # just to use $duplicates[-1] freely
   my $prev = "";
-  foreach my $f (sort map { TeXLive::TLUtils::basename($_) } @runtime_files) {
-    push (@duplicates, $f) if (($f eq $prev) and not ($f eq $duplicates[-1]));
+  for my $f (sort map { lc(TeXLive::TLUtils::basename($_)) } @runtime_files) {
+    if ($f eq $prev && !($f eq $duplicates[-1])) {
+      push(@duplicates, $f);
+    }
     $prev = $f;
   }
   shift @duplicates; # get rid of the fake 1st value
@@ -5693,13 +5696,12 @@
             |.*-noEmbed\.map
             |ps2mfbas\.mf
             |pstricks\.con
-            |readme.*
             |sample\.bib
             |tex4ht\.env
             |test\.mf
             |texutil\.rb
             |tlmgrgui\.pl
-           )$/x;
+           )$/xi;
     # For the a_.* line above: source*pro has .enc files which differ
     # only in comments, hence the otftotfm-hashed name is the same.
     # Seems like it could happen more or at random with other fonts too.
@@ -5714,6 +5716,7 @@
     # https://tug.org/pipermail/tex-live/2019-December/044530.html
     next if $f
       =~ /^( afoot\.sty
+            |cherokee\.tfm
             |gamma\.mf
             |lexer\.lua
             |ligature\.mf
@@ -5720,24 +5723,29 @@
             |md-utrma\.pfb
             |ot1\.cmap
             |t1\.cmap
-           )$/x;
+            |ut1omlgc\.fd
+           )$/xi;
 
-    my @copies = grep (/\/$f$/, @runtime_files);
+    my @copies = grep (/\/$f$/i, @runtime_files);
     # map files can be duplicated between (but not within) formats.
     if ($f =~ /\.map$/) {
       my $need_check = 0;
       my $prev_dir = "";
       my @cop = @copies; # don't break the outside list
-      map { s#^texmf-dist/fonts/map/(.*?)/.*#$1# } @cop;
-      foreach my $dir (sort @cop ) {
+      map { s!^texmf-dist/fonts/map/(.*?)/.*!$1!; } @cop;
+      foreach my $dir (sort @cop) {
         last if ($need_check = ($dir eq $prev_dir));
         $prev_dir = $dir;
       }
       next unless $need_check;
     }
-    # if all copies are identical, ok, else, complain
+    # if all copies are identical, ok, else complain.
     my $diff = 0;
-    for (my $i = 1; $i < scalar(@copies); $i++) {
+    for (my $i = 1; $i < @copies; $i++) {
+      # there are many duplicates between asymptote/GUI and
+      # asymptote/GUI/pyUIClass; don't omit checks for other .py files.
+      next if $copies[$i] =~ m!asymptote/.*\.py$!;
+      #
       if ($diff = tlcmp("$Master/$copies[$i-1]", "$Master/$copies[$i]")) {
         print "# $f\ndiff $Master/$copies[$i-1] $Master/$copies[$i]\n";
         last;
@@ -10216,7 +10224,7 @@
 distribution (L<https://tug.org/texlive>) and both are licensed under the
 GNU General Public License Version 2 or later.
 
-$Id: tlmgr.pl 59154 2021-05-09 22:00:07Z karl $
+$Id: tlmgr.pl 59208 2021-05-15 17:45:58Z karl $
 =cut
 
 # test HTML version: pod2html --cachedir=/tmp tlmgr.pl >/tmp/tlmgr.html

Modified: trunk/Master/texmf-dist/doc/generic/musixtex/README
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/README	2021-05-17 20:38:21 UTC (rev 59239)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/README	2021-05-17 20:40:09 UTC (rev 59240)
@@ -1,4 +1,4 @@
-This is MusiXTeX, version 1.31 (2021-01-07).
+This is MusiXTeX, version 1.32a (2021-05-16).
 MusiXTeX is a TeX-based system for typesetting music.
 
 The main author was Daniel Taupin, who died in a climbing

Modified: trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/beams.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/beams.tex	2021-05-17 20:38:21 UTC (rev 59239)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/beams.tex	2021-05-17 20:40:09 UTC (rev 59240)
@@ -622,6 +622,6 @@
 
 
  \section{Discontinuities in Long Beams}
-Beams are normally produced by \texttt{musixtex} using special fonts.  Unfortunately, very long beams may have
+By default, \texttt{musixtex} produces beams using special fonts.  Unfortunately, long beams may have
 unsightly discontinuities (gaps or bumps). See Section~\ref{musixvbm}
-for an experimental solution to this problem.
+for a solution to this problem.

Modified: trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/extensions.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/extensions.tex	2021-05-17 20:38:21 UTC (rev 59239)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/extensions.tex	2021-05-17 20:40:09 UTC (rev 59240)
@@ -2178,39 +2178,53 @@
 
  \section{musixvbm}\ixtt{musixvbm.tex}
 \label{musixvbm}
-Beams are normally produced by \texttt{musixtex} using special fonts.  Unfortunately, very long beams may have
-unsightly discontinuities (gaps or bumps). This experimental add-on
-(by Hiroaki \textsc{Morimoto}) produces vectorized beams without these
-discontinuities.  Compare
-\begin{description}
-\item{}
+By default, \texttt{musixtex} produces beams using special fonts.  Unfortunately, long beams may have
+unsightly discontinuities (gaps or bumps). The \texttt{musixvbm}  add-on
+by Hiroaki \textsc{Morimoto} produces smooth vectorized beams.
+Compare
+
+\medskip
 \begin{music}
+\let\extractline\hbox
+\vectorizedbeamfalse
 \nostartrule
 \setclef1{\bass}
+\hbox to \hsize{%
+\hss
 \startextract
 \nnotes\ibbl0G1\qb0{GJKLMLMLMLMLMLMK}\tqb0L\en
-\endextract
-\end{music}
-\end{description}
-and
-\begin{description}
-\item{}
-\begin{music}
-\input musixvbm
-\nostartrule
-\setclef1{\bass}
+\zendextract
+\hss
+\raise20pt\hbox{ and }
+\hss
+\vectorizedbeamtrue
 \startextract
 \nnotes\ibbl0G1\qb0{GJKLMLMLMLMLMLMK}\tqb0L\en
-\endextract
+\zendextract
+\hss}
 \end{music}
-\end{description}
-especially when magnified.
+\medskip
+\noindent
+with various magnifications. The output on the left shows a font-based beam; the one
+on the right (like all the other beams in this report) shows the same beam with
+\texttt{musixvbm} activated.  
 
-The only known disadvantage is that some \texttt{dvi} viewers
-including \texttt{xdvi} and \texttt{yap} do not support the \texttt{tpic} specials
-that implement the vectorized beams so that no beams are shown; however, Postscript and PDF
-output generated using \texttt{dvips} and \texttt{ps2pdf} (or \texttt{dvipdfm}) should be satisfactory.  
 
+The only known disadvantage with use of \texttt{musixvbm} is that many \texttt{dvi} viewers
+(including \texttt{xdvi} and \texttt{yap}) do not support the ``\texttt{tpic} specials''
+that implement vectorized beams in \texttt{dvi} output, so that no beams are shown\footnote{%
+The \texttt{dviout} program for Windows supports \texttt{tpic} specials;
+it is available from CTAN and in the Win32 distribution of TeXLive.};
+however, Postscript and PDF
+output generated using \texttt{dvips} and \texttt{ps2pdf} (or using
+\texttt{dvipdfm},
+or by processing the score using \texttt{pdfetex}) should be satisfactory.  
+
+If Postscript hairpins
+as described in Section~\ref{PostscriptSlurs} are not being used,
+the \texttt{musixvbm} add-on also vectorizes crescendos and
+decrescendos. 
+
 \section{tuplet}
 
 This file does nothing; it is provided for compatibility with 
@@ -2218,9 +2232,7 @@
 Since version 1.21, \verb|musixtex.tex| itself contains all the functions 
 of the older \texttt{tuplet.tex}, namely 
 definitions of 
-\begin{itemize}
-\item \keyindex{tuplettxt}
-\item \keyindex{uptuplet}
-\item \keyindex{downtuplet}
-\end{itemize}
+\keyindex{tuplettxt}, 
+\keyindex{uptuplet} and
+\keyindex{downtuplet}.
 See Section~\ref{tuplet}.

Modified: trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/frontmatter.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/frontmatter.tex	2021-05-17 20:38:21 UTC (rev 59239)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/frontmatter.tex	2021-05-17 20:40:09 UTC (rev 59240)
@@ -1,6 +1,6 @@
 \title{\Huge\bfseries\musixtex\\[\bigskipamount]
 \LARGE\bfseries Using \TeX{} to write polyphonic\\or
-instrumental music\\\Large\itshape Version 1.32}
+instrumental music\\\Large\itshape Version 1.32a}
 \author{}
 
 

Modified: trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/musixdoc.sty
===================================================================
--- trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/musixdoc.sty	2021-05-17 20:38:21 UTC (rev 59239)
+++ trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc/musixdoc.sty	2021-05-17 20:40:09 UTC (rev 59240)
@@ -47,7 +47,7 @@
 \usepackage{textcomp}
 
 \input musixtex
-%\input musixvbm  % experimental vectorized beams
+\input musixvbm  % experimental vectorized beams
 \input musixbm
 \input musixcho
 \input musixdat

Modified: trunk/Master/texmf-dist/doc/generic/musixtex/musixdoc.pdf
===================================================================
(Binary files differ)

Added: trunk/Master/texmf-dist/scripts/musixtex/musixflx.bat
===================================================================
--- trunk/Master/texmf-dist/scripts/musixtex/musixflx.bat	                        (rev 0)
+++ trunk/Master/texmf-dist/scripts/musixtex/musixflx.bat	2021-05-17 20:40:09 UTC (rev 59240)
@@ -0,0 +1,6 @@
+:: wrapper script to call musixflx.lua
+:: Usage: musixflx basename[.mx1 | .tex] [debug mode]
+:: Suggested by Tomasz Luczak (Tomek) t34www at googlemail.com
+
+ at for /f "delims=" %%I in ('kpsewhich --format=texmfscripts %~n0.lua') do texlua "%%I" %*
+:end


Property changes on: trunk/Master/texmf-dist/scripts/musixtex/musixflx.bat
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Added: trunk/Master/texmf-dist/scripts/musixtex/musixtex.bat
===================================================================
--- trunk/Master/texmf-dist/scripts/musixtex/musixtex.bat	                        (rev 0)
+++ trunk/Master/texmf-dist/scripts/musixtex/musixtex.bat	2021-05-17 20:40:09 UTC (rev 59240)
@@ -0,0 +1,6 @@
+:: wrapper script to call musixtex.lua
+:: Usage: musixtex [options] basename[.tex|.ltx|.mtx|.pmx|.aspc]
+:: Suggested by Tomasz Luczak (Tomek) t34www at googlemail.com
+
+ at for /f "delims=" %%I in ('kpsewhich --format=texmfscripts %~n0.lua') do texlua "%%I" %*
+:end


Property changes on: trunk/Master/texmf-dist/scripts/musixtex/musixtex.bat
___________________________________________________________________
Added: svn:executable
## -0,0 +1 ##
+*
\ No newline at end of property
Modified: trunk/Master/texmf-dist/tex/generic/musixtex/musixvbm.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/musixtex/musixvbm.tex	2021-05-17 20:38:21 UTC (rev 59239)
+++ trunk/Master/texmf-dist/tex/generic/musixtex/musixvbm.tex	2021-05-17 20:40:09 UTC (rev 59240)
@@ -1,5 +1,5 @@
 %%
-%% musixvbm.tex - MusiXTeX Extention, Vectorized Beams (& crescendos)
+%% musixvbm.tex - MusiXTeX Extension, Vectorized Beams (& crescendos)
 %%                by tpic specials / pdfTeX raw literal
 %%
 %% Copyright (C) 2000-2007 Hiroaki MORIMOTO (Kuuku)
@@ -31,7 +31,7 @@
 %% This is a successor of `musixtpb.tex' ver.1.10.
 %%
 \ifx\ifvectorizedbeam\undefined\else\endinput\fi
-\immediate\write16{MusiXTeX Extention, Vectorized Beams and crescendos v1.20-beta6 <2007/01/01>}%
+\immediate\write16{MusiXTeX Extension, Vectorized Beams and crescendos v1.20-beta6 <2007/01/01>}%
 %
 \edef\catcodeat{\the\catcode`\@}\catcode`\@=11
 %
@@ -87,13 +87,13 @@
   \advance\y at iv \tw@\b at amthick
   \@dimentomil{-\y at iv}{\@Yend at u}%
 %  \special{pn 1}% 
-  \special{sh 1}%
-  \@addbeampath{0}{\@Ystart at l}%
+  \special{sh 1}%                     set beam shading to black
+  \@addbeampath{0}{\@Ystart at l}%       add points to define the beam perimeter
   \@addbeampath{\@Xend}{\@Yend at l}%
   \@addbeampath{\@Xend}{\@Yend at u}%
   \@addbeampath{0}{\@Ystart at u}%
-  \@addbeampath{0}{\@Ystart at l}%
-  \special{ip}%
+  \@addbeampath{0}{\@Ystart at l}%       close the perimeter
+  \special{ip}%                       draw the beam (without the outline) 
   \kern\y at ii
 }%
 %



More information about the tex-live-commits mailing list.