pdf: NoCaseChange for footnotes

diff --git a/librarian/pdf/wl.sty b/librarian/pdf/wl.sty
index 847504c..579ee7f 100644 (file)
--- a/librarian/pdf/wl.sty
+++ b/librarian/pdf/wl.sty
@@ -7,6 +7,8 @@
 \usepackage{xunicode}
 \usepackage{xltxtra}
 
+\usepackage[overload]{textcase}
+
 \setmainfont [
 %ExternalLocation,
 UprightFont = JunicodeWL-Regular,
@@ -272,10 +274,10 @@ Letters={Uppercase}
 }
 
 
-\newcommand{\pa}[1]{\footnote{#1}}
-\newcommand{\pe}[1]{\footnote{#1}}
-\newcommand{\pr}[1]{\footnote{#1}}
-\newcommand{\pt}[1]{\footnote{#1}}
+\newcommand{\pa}[1]{\NoCaseChange{\footnote{#1}}}
+\newcommand{\pe}[1]{\NoCaseChange{\footnote{#1}}}
+\newcommand{\pr}[1]{\NoCaseChange{\footnote{#1}}}
+\newcommand{\pt}[1]{\NoCaseChange{\footnote{#1}}}
 
 \newcommand{\mat}[1]{$#1$}