summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tagpdf/ex-spaceglyph-listings.tex
blob: d04f8824fbc9c375b194dfe02f574db1c2677f47 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
% !Mode:: "TeX:DE:UTF-8:Main"
\RequirePackage{pdfmanagement-testphase}
\DeclareDocumentMetadata{uncompress,}
\documentclass{article}
\usepackage{amsmath}
\usepackage[ngerman]{babel}
\usepackage{tagpdf,listings}
\makeatletter
%\def\lst@outputspace{\pdffakespace\ } %not so good
% this here works fine with luatex, if the font has a space glyph:
% the pdf then has four space glyphs. But this doesn't mean that they get copied&pasted!
\def\lst@visiblespace{\lst@ttfamily{\char32}{\char32}}
% with pdftex this could work
%\def\lst@visiblespace{\lst@ttfamily{\pdffakespace\ }{\pdffakespace\ }}
\tagpdfsetup{activate,interwordspace=on,show-spaces,log=v}
\begin{document}\pagestyle{empty}
\tagmcbegin{tag=P}
\begin{lstlisting}[showspaces]
aaa aaa    xxxx
\end{lstlisting}
\tagmcend
\end{document}