1 files changed, 3 insertions, 2 deletions

diff --git a/arabluatex.dtx b/arabluatex.dtx
index 0142c1e..e6b6e87 100644
--- a/arabluatex.dtx
+++ b/arabluatex.dtx
@@ -4314,8 +4314,9 @@ wa-ya.sIru ta.hta 'l-jild-i
 % argument one or more Arabic words, each of which will be rendered in
 % upright roman style with its first letter uppercased.
 %    \begin{macrocode}
-\NewDocumentCommand{\prname}{m}{%
-  \bgroup\SetTranslitStyle{\relax}\arb[trans]{\uc{#1}}\egroup}
+\NewDocumentCommand{\prname}{s m}{%
+  \bgroup\SetTranslitStyle{\relax}%
+  \IfBooleanTF{#1}{\txtrans{#2}}{\arb[trans]{\uc{#2}}}\egroup}
 %    \end{macrocode}
 % \end{macro}
 % \begin{macro}{\txarb} \cs{txarb} sets the direction to right-to-left