From 64f93662b149db20c740f69a8ed5e9e8437b3a70 Mon Sep 17 00:00:00 2001
From: Rolf Niepraschk <Rolf.Niepraschk@ptb.de>
Date: Fri, 21 Apr 2023 13:04:51 +0200
Subject: [PATCH] \"\shorthandon{"}\" an falscher Stelle
---
ptbletter/ptbletter.cls | 14 ++++++--------
1 file changed, 6 insertions(+), 8 deletions(-)
diff --git a/ptbletter/ptbletter.cls b/ptbletter/ptbletter.cls
index 327ffa3..ec3a167 100644
--- a/ptbletter/ptbletter.cls
+++ b/ptbletter/ptbletter.cls
@@ -1,9 +1,9 @@
-% Rolf Niepraschk, Rolf.Niepraschk@ptb.de
+% Rolf Niepraschk, Rolf.Niepraschk@gmx.de
\setcounter{errorcontextlines}{100} \listfiles
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
-\ProvidesClass{ptbletter}[2021/06/04 v0.4b PTB-Brief-Klasse (RN)]
+\ProvidesClass{ptbletter}[2023/04/21 v0.4c PTB-Brief-Klasse (RN)]
\let\ptb@tempdima=\@ovxx
\let\ptb@tempdimb=\@ovyy
@@ -113,16 +113,15 @@
\RequirePackage[\ptb@lang]{babel}
\RequirePackage{etoolbox,iflang,trimspaces}
\AtEndPreamble{%
- \IfLanguageName{ngerman}{
- \AtEndOfClass{\shorthandon{"}}
+ \IfLanguageName{ngerman}{%
\RequirePackage[autostyle=true,german=guillemets,maxlevel=3]{csquotes}%
}{%
\RequirePackage[babel=once]{csquotes}
\useshorthands*{"}
- }
+ }%
\MakeAutoQuote{»}{«}
\defineshorthand{"`}{\openautoquote}
- \defineshorthand{"'}{\closeautoquote}
+ \defineshorthand{"'}{\closeautoquote}\shorthandon{"}
}
\AtEndOfClass{%
@@ -132,8 +131,6 @@
}%
}
-%%%\AtEndOfClass{\shorthandon{"}}
-
\setplength{toaddrhpos}{72bp}
\setplength{toaddrvpos}{124bp}
@@ -372,6 +369,7 @@
,babel=true
]{microtype}
\fi
+ \shorthandon{"}%
}
\RequirePackage{enumitem}
\setlist{leftmargin=*,nosep,topsep=.5em,itemsep=.25em}
--
GitLab