quotes-Automatik auch für XeLaTeX/LuaLaTeX

adressaufkleber/vl-addressLabels.cls

@@ -117,7 +117,11 @@
   \defineshorthand{"'}{\closeautoquote}
 }{%
 }
-\MakeAutoQuote{»}{«} 
+\MakeAutoQuote{»}{«}
+\@ifpackageloaded{inputenc}{}{%
+  \catcode`\»=\active
+  \catcode`\«=\active
+}
 
 \RequirePackage{picture}
 

kalibrierschein/kalibrierschein.cls

@@ -35,19 +35,24 @@
 
 \RequirePackage[\ks@langs]{babel}
 \RequirePackage{iflang}
+\RequirePackage[babel=once,german=guillemets]{csquotes}
 \IfLanguageName{ngerman}{%
   \typeout{ngerman}
-  \RequirePackage[babel=once,german=guillemets]{csquotes}
   \AtEndOfClass{\shorthandon{"}}
   \defineshorthand{"`}{\openautoquote}
   \defineshorthand{"'}{\closeautoquote}
-  \MakeAutoQuote{»}{«}
   \AtBeginDocument{\sisetup{locale=DE}}
 }{%
   \typeout{english}
-  \RequirePackage[babel=once]{csquotes}
   \AtBeginDocument{\sisetup{locale=UK}}
 }
+\MakeAutoQuote{»}{«}
+\AtEndOfClass{%
+  \@ifpackageloaded{inputenc}{}{%
+    \catcode`\»=\active
+    \catcode`\«=\active
+  }%
+}
 
 \def\huge{\@setfontsize\huge{20.26}{25.3}}
 \def\large{\@setfontsize\large{12.17}{14.2}}
@@ -293,7 +298,7 @@
 
 \newcommand*\ks@applicant{%
   Name des Auftraggebers, Stra\ss e, Firmensitz}
-\newcommand*\applicant[1]{\xdef\ks@applicant{\trim@spaces{#1}}}
+\newcommand*\applicant[1]{\long\gdef\ks@applicant{#1}}
 
 \newcommand*\ks@serialNo{XXX,YYY}
 \newcommand*\serialNo[1]{%