Euro-Symbol

ptbletter/ptbletter-new-engines.clo

+% Rolf Niepraschk, Rolf.Niepraschk@ptb.de
+
+\ProvidesFile{ptbletter-new-engines.clo}%
+  [2017/12/04 v0.1a PTB-Brief -- new engines (RN)]
+  
+\RequirePackage{fontspec}
+\RequirePackage{unicode-math}
+\AtBeginDocument{% ???
+  \setromanfont{texgyrepagella}[
+    Ligatures=TeX,
+    Extension=.otf,
+    UprightFont=*-regular,
+    BoldFont=*-bold,
+    ItalicFont=*-italic,
+    BoldItalicFont=*-bolditalic]
+  \setsansfont{texgyreheros}[
+    Ligatures=TeX,
+    Extension=.otf,
+    UprightFont=*-regular,
+    BoldFont=*-bold,
+    ItalicFont=*-italic,
+    BoldItalicFont=*-bolditalic]
+}
+\RequirePackage[TT={Scale=0.85}]{dejavu-otf}
+\iffalse
+\setmonofont{AnonymousPro-Regular}[%
+  Extension = .ttf,
+  BoldFont = AnonymousPro-Bold,
+  ItalicFont = AnonymousPro-Italic,
+  BoldItalicFont = AnonymousPro-BoldItalic,
+  Scale     = MatchLowercase
+]
+\fi
+\RequirePackage{newunicodechar}
+\newunicodechar{^^^^20ac}{\officialeuro}
+
+\endinput

ptbletter/ptbletter-old-engines.clo

+% Rolf Niepraschk, Rolf.Niepraschk@ptb.de
+
+\ProvidesFile{ptbletter-old-engines.clo}%
+  [2017/12/04 v0.1a PTB-Brief -- old engines (RN)]
+
+\RequirePackage[utf8]{inputenc}
+\RequirePackage[T1]{fontenc}
+\usepackage[scaled=0.85]{DejaVuSansMono}
+\RequirePackage{textcomp}
+\RequirePackage{mathpazo}
+\RequirePackage{tgpagella}
+\RequirePackage{tgheros}
+%\RequirePackage[ttdefault=true,scale=1.034]{AnonymousPro}
+
+\endinput

ptbletter/ptbletter.cls

@@ -70,61 +70,32 @@
 \newif\ifXeOrLua \XeOrLuafalse
 \ifxetex\XeOrLuatrue\else\ifluatex\XeOrLuatrue\fi\fi
 
-% TODO: Mathematik?
+\RequirePackage[right]{eurosym}
+
 \ifXeOrLua% XeLaTeX oder luaLaTeX
-  \RequirePackage{fontspec}
-  \RequirePackage{unicode-math}
-  \AtBeginDocument{% ???
-    \setromanfont{texgyrepagella}[
-      Ligatures=TeX,
-      Extension=.otf,
-      UprightFont=*-regular,
-      BoldFont=*-bold,
-      ItalicFont=*-italic,
-      BoldItalicFont=*-bolditalic]
-    \setsansfont{texgyreheros}[
-      Ligatures=TeX,
-      Extension=.otf,
-      UprightFont=*-regular,
-      BoldFont=*-bold,
-      ItalicFont=*-italic,
-      BoldItalicFont=*-bolditalic]
-  }
-  \RequirePackage[TT={Scale=0.85}]{dejavu-otf}
-  \iffalse
-  \setmonofont{AnonymousPro-Regular}[%
-    Extension = .ttf,
-    BoldFont = AnonymousPro-Bold,
-    ItalicFont = AnonymousPro-Italic,
-    BoldItalicFont = AnonymousPro-BoldItalic,
-    Scale     = MatchLowercase
-  ]
-  \fi
+  \input{ptbletter-new-engines.clo}
 \else
-  \RequirePackage[utf8]{inputenc}
-  \RequirePackage[T1]{fontenc}
-  \usepackage[scaled=0.85]{DejaVuSansMono}
-  \RequirePackage{textcomp}
-  \RequirePackage{mathpazo}
-  \RequirePackage{tgpagella}
-  \RequirePackage{tgheros}
-  %\RequirePackage[ttdefault=true,scale=1.034]{AnonymousPro}
+  \input{ptbletter-old-engines.clo}
 \fi
+
 \def\tiny{\@setfontsize\tiny{7}{8.17}}
+
 \ifptb@serif 
   \renewcommand*\familydefault{\rmdefault}
 \else
   \renewcommand*\familydefault{\sfdefault}
 \fi
 
+\let\texteuro=\officialeuro
+
 
 %\RequirePackage{etoolbox}
 %\preto\@classoptionslist{ngerman,}
 % Ohne Sprachangabe "deutsch" verwenden. Bessere Lösung?
 
 \RequirePackage[\ptb@lang]{babel}
-\RequirePackage{iflang}
-\AtBeginDocument{%
+\RequirePackage{etoolbox,iflang}
+\AtEndPreamble{%
   \IfLanguageName{ngerman}{
     \RequirePackage[babel=once,german=guillemets]{csquotes}
   }{%