diff options
-rwxr-xr-x | Build/cdbuild/ctan2tds.pl | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Build/cdbuild/ctan2tds.pl b/Build/cdbuild/ctan2tds.pl index 7e0bd798584..f59f04f1ffa 100755 --- a/Build/cdbuild/ctan2tds.pl +++ b/Build/cdbuild/ctan2tds.pl @@ -702,7 +702,6 @@ $standardtex='\.cfg|\.sty|\.clo|\.ldf|\.cls|\.def|\.fd$'; 'hyper', '\.sty|\.hyp', 'hyplain', '(hyrules|hy.*plain|hylang)\..*', 'insbox', 'insbox.tex', - 'inversepath', '^[^d].*.sty', # no dtx-style.sty 'iso10303', 'a.*tex|b.*tex|e.*tex|stp.*tex|\.sty|\.4ht', 'isodate', '\.idf|\.sty', 'isodoc', 'iso.*\.sty', # not mystyle.sty, etc. @@ -710,7 +709,6 @@ $standardtex='\.cfg|\.sty|\.clo|\.ldf|\.cls|\.def|\.fd$'; 'karnaugh', 'kvmacros.tex', 'keystroke', 'keystroke_.*|\.sty', 'kuvio', '\.tex|\.sty', - 'leading', '^[^d].*.sty', # no dtx-style.sty 'lettre', '\.ins|\.cls', 'lettrine', '\.sty|\.cfl|\.cfg', 'magyar', 'NULL', # don't want to conflict with standard babel @@ -722,7 +720,6 @@ $standardtex='\.cfg|\.sty|\.clo|\.ldf|\.cls|\.def|\.fd$'; 'minitoc', "\.ml[do]|$standardtex", 'misc', '\.sty|\.ltx|\.cls', 'mkpattern', 'mkpatter.tex', - 'mlist', '^[^d].*.sty', # no dtx-style.sty 'msg', "$standardtex|-msg\.tex", 'nag', "$standardtex|\.cfg|\.nag", 'ntheorem', '\.sty|\.std', @@ -1294,8 +1291,10 @@ sub runins { sub install { local($destdir,$thispatt) = @_; print "\t INSTALL $thispatt to $destdir\n"; + &SYSTEM ("mkdir -p $destdir") unless -d $destdir; + for (grep (/$thispatt/, @filenames)) { - &SYSTEM ("mkdir -p $destdir") unless -d $destdir; + next if $_ eq "dtx-style.sty"; # this should never be in runtime &SYSTEM ("$MV $_ $destdir"); } } |