Problema con fancyhead / rhead usando Devanagari

Question

Sembra esserci qualche problema con fancyhead / rhead quando utilizzo un font Devanagari. Il mio codice è il seguente:

\documentclass[letterpaper,12pt]{article}
\usepackage{fancyhdr}
\usepackage{footnpag}
\usepackage{fontspec}
\usepackage{polyglossia}
\usepackage[total={6.5in,8.75in},top=1.2in,left=1.1in]{geometry}
\pagestyle{fancy}

\newcommand{\san}{
\catcode`\^=12
\catcode`\~=12
\fontspec[Script=Devanagari,Mapping=velthuis-sanskrit]{Shobhika Bold}}

\begin{document}
\rhead{\san pa~nca}
{\san pa~nca}
\end{document}

L'output è di seguito. La pa ~ nca nella testa è sbagliata e il corpo ha ragione.

Answer 1

Quello che sono riuscito a ottenere è stato l'inserimento del testo UTF-8 senza la mappatura. La modifica dei codici cat sembra essere complicata. Ma questo ha funzionato per me in XeLaTeX:

\documentclass[letterpaper,12pt]{article}
\tracinglostchars=2
\usepackage{fancyhdr}
\usepackage{footnpag}
\usepackage{fontspec}
\usepackage{polyglossia}

\setdefaultlanguage{english}
\setotherlanguage[script=Devanagari]{sanskrit}

\newfontfamily\devanagarifont{Shobhika}[
  Script=Devanagari,
  Scale=MatchLowercase ]

\newfontface\translitfont{Shobhika Bold}[
  Script=Devanagari,
  Mapping=velthuis-sanskrit,
  Scale=MatchLowercase ]

\usepackage[total={6.5in,8.75in},top=1.2in,left=1.1in]{geometry}
\pagestyle{fancy}
\fancyhead{}

\newcommand{\san}{\catcode`\^=12\catcode`\~=12\translitfont}

\begin{document}
\fancyhead[R]{\textbf{\textsanskrit{पञ्च}}}
{\san pa~nca}
\end{document}

Answer 2

Una soluzione alternativa per questo problema è

\documentclass[letterpaper,12pt]{article}
\usepackage{fancyhdr}
\usepackage{footnpag}
\usepackage{fontspec}
\usepackage{polyglossia}
\usepackage{skt}
\usepackage[total={6.5in,8.75in},top=1.2in,left=1.1in]{geometry}
\pagestyle{fancy}

\newcommand{\sj}{\char"091E}

\newcommand{\san}{
\catcode`\^=12
\catcode`\~=12
\fontspec[Script=Devanagari,Mapping=velthuis-sanskrit]{Shobhika Bold}}
\begin{document}
\rhead{\san pa{\sj}ca}
{\san pa~nca}
\end{document}

Ma sto cercando una soluzione più robusta.