Ich habe quasi saputellos Antwort nochmal in `expl3` implementiert. Die Eingabe von `\writeextra` wird nicht expandiert, sondern direkt so in die Datei geschrieben. \documentclass{scrreprt} \usepackage{selinput} \SelectInputMappings{adieresis={ä}, germandbls={ß}} \usepackage[ngerman]{babel} \usepackage{xparse} \ExplSyntaxOn \cs_generate_variant:Nn \iow_now:Nn { nn } \iow_new:N \l_cis_out_stream \tex_chardef:D \shell_escape = 18 \iow_open:Nn \l_cis_out_stream { extra1.tex } \NewDocumentCommand \writeextra { +v } { \group_begin: \tex_endlinechar:D = 10 \tex_newlinechar:D = 13 \iow_now:Nn \l_cis_out_stream { #1 } \group_end: } \AfterReadingMainAux { \iow_now:Nn \l_cis_out_stream { \end{document} } \iow_close:N \l_cis_out_stream \iow_now:Nn \shell_escape { pdflatex ~ extra1.tex } } \writeextra { \documentclass{scrreprt} \usepackage{selinput} \SelectInputMappings{adieresis={ä}, germandbls={ß}} \usepackage[ngerman]{babel} % ggf. Präambel erweitern \begin{document} } \ExplSyntaxOff \begin{document} Hier ist ein Satz. \par \writeextra{Schreibe diesen Text in die äxterne Datei extra1.pdf Sogar mit newlines\par} Hier ist wieder ein Satz. \par \writeextra{Schreibe diesen Text auch in die Datei extra1.pdf dazu.} \end{document}

Ich habe quasi saputellos Antwort nochmal in `expl3` implementiert. Die Eingabe von `\writeextra` wird nicht expandiert, sondern direkt so in die Datei geschrieben. \documentclass{scrreprt} \usepackage{selinput} \SelectInputMappings{adieresis={ä}, germandbls={ß}} \usepackage[ngerman]{babel} \usepackage{xparse} \ExplSyntaxOn \cs_generate_variant:Nn \iow_now:Nn { nn } \iow_new:N \l_cis_out_stream \tex_chardef:D \shell_escape = 18 \iow_open:Nn \l_cis_out_stream { extra1.tex } \NewDocumentCommand \writeextra { +v } { \group_begin: \tex_endlinechar:D = 10 \tex_newlinechar:D = 13 \iow_now:Nn \l_cis_out_stream { #1 } \group_end: } \AfterReadingMainAux { \iow_now:Nn \l_cis_out_stream { \end{document} } \iow_close:N \l_cis_out_stream \iow_now:Nn \shell_escape { pdflatex ~ extra1.tex } } \writeextra { \documentclass{scrreprt} \usepackage{selinput} \SelectInputMappings{adieresis={ä}, germandbls={ß}} \usepackage[ngerman]{babel} % ggf. Präambel erweitern \begin{document} } \ExplSyntaxOff \begin{document} Hier ist ein Satz. \par \writeextra{Schreibe diesen Text in die äxterne Datei extra1.pdf Sogar mit newlines\par} Hier ist wieder ein Satz. \par \writeextra{Schreibe diesen Text auch in die Datei extra1.pdf dazu.} \end{document}