fullblck.sty, luecking mail 18 Feb 2012 20:02:38

git-svn-id: svn://tug.org/texlive/trunk@25434 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 63 insertions, 0 deletions

diff --git a/Master/texmf-dist/source/latex/fullblck/fullblck.ins b/Master/texmf-dist/source/latex/fullblck/fullblck.ins
new file mode 100644
index 00000000000..b0ce9e99db4
--- /dev/null
+++ b/Master/texmf-dist/source/latex/fullblck/fullblck.ins
@@ -0,0 +1,9 @@
+%% LaTeX2e file `fullblck.ins'
+%% generated by the `filecontents' environment
+%% from source `fullblck' on 2012/02/20.
+%%
+\def\batchfile{fullblck.ins}
+\input docstrip.tex
+\keepsilent
+\generate{\file{fullblck.sty}{\from{fullblck.dtx}{package}}}
+\endbatchfile
diff --git a/Master/texmf-dist/tex/latex/fullblck/fullblck.sty b/Master/texmf-dist/tex/latex/fullblck/fullblck.sty
new file mode 100644
index 00000000000..92eae7089ea
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/fullblck/fullblck.sty
@@ -0,0 +1,44 @@
+%%
+%% This is file `fullblck.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% fullblck.dtx  (with options: `package')
+%% 
+%% IMPORTANT NOTICE:
+%% 
+%% For the copyright see the source file.
+%% 
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from fullblck.sty.
+%% 
+%% For distribution of the original source see the terms
+%% for copying and modification in the file fullblck.dtx.
+%% 
+%% This generated file may be distributed as long as the
+%% original source files, as listed above, are part of the
+%% same distribution. (The sources need not necessarily be
+%% in the same archive or directory.)
+%% File: fullblck.dtx Copyright 1998,1999 James H. Cloos, Jr. <cloos@jhcloos.com>
+\NeedsTeXFormat{LaTeX2e}[1996/06/01]
+\ProvidesPackage{fullblck}
+  [1998/11/17 v1.1 JHCloos FullBlock Style for Letters]
+\longindentation=0pt%
+\renewcommand*{\opening}[1]{\ifx\@empty\fromaddress
+  \thispagestyle{firstpage}%
+    {\raggedright\@date\par}%
+  \else  % home address
+    \thispagestyle{empty}%
+    {\raggedright\ignorespaces
+      \fromaddress \\*[2\parskip]%
+      \@date \par}%
+  \fi
+  \vspace{2\parskip}%
+  {\raggedright \toname \\ \toaddress \par}%
+  \vspace{2\parskip}%
+  #1\par\nobreak}
+
+\endinput
+%%
+%% End of file `fullblck.sty'.
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index bfe4143a83b..7d1172cb9cd 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -1701,6 +1701,8 @@ $standardsource='\.(c|drv|dtx|fea|fdd|ins|sfd)$|configure.*|install-sh';
  'findhyph',		'NULL',			# leave makefile
  'fmtcount',		'fmtcount.perl|' . $standardsource,
  'fpl',			'Add|\.pe|\.ps' . $standardsource,
+ 'fullblck',		'\.asc|' . $standardsource,
+ 'grverb',		'\.vpl|' . $standardsource,
  'geometry-de',		'NULL',			# keep together
  'grverb',		'\.vpl|' . $standardsource,
  'hyper',		'\.pl|' . $standardsource,
@@ -1757,6 +1759,7 @@ $standardsource='\.(c|drv|dtx|fea|fdd|ins|sfd)$|configure.*|install-sh';
  'feynmf',	'feynmf.ins',
  'fixltxhyph',	'fixltxhyph.dtx',
  'floatrow',	'floatrow.ins',
+ 'fullblck',	'fullblck.dtx$',
  'geometry',	'geometry.dtx',
  'geometry-de',	'NULL',			# doc, no need to build
  'hausarbeit-jura',	'hausarbeit-jura.dtx',
@@ -2566,6 +2569,13 @@ sub runins {
   for (grep (/$thispatt/, @filenames)) { 
     # do not infinite loop on docstrip "output directory", e.g., fltpoint.
     &runjob ("yes | sed 10q | $insrunner $_");
+    
+    # in the case of fullblck, the .dtx creates the .ins (so the .ins is
+    # not in @filenames), and the .ins creates the .sty.  Why hasn't
+    # this come up before?
+    if (! grep (/$package\.ins$/, @filenames) && -r "$package.ins") {
+      &runjob ("yes | sed 10q | $insrunner $package.ins");
+    }
   }
 
   &killfiles ($specialclean{$package} || $standardclean);