texinfo: Allow markup in the arguments of `@pxref'.

* module/texinfo.scm (texi-command-specs)[pxref]: Change to
  `INLINE-TEXT-ARGS'.
* test-suite/tests/texinfo.test ("test-texinfo->stexinfo")["@pxref{Locales,
  @code{setlocale}}"]: New test.

diff --git a/module/texinfo.scm b/module/texinfo.scm
index edee5b3..cb7a775 100644 (file)
--- a/module/texinfo.scm
+++ b/module/texinfo.scm
@@ -216,7 +216,8 @@ lambda. Only present for @code{INLINE-ARGS}, @code{EOL-ARGS},
     (value              INLINE-ARGS . (key))
     (ref                INLINE-ARGS . (node #:opt name section info-file manual))
     (xref               INLINE-ARGS . (node #:opt name section info-file manual))
-    (pxref              INLINE-ARGS . (node #:opt name section info-file manual))
+    (pxref              INLINE-TEXT-ARGS
+                        . (node #:opt name section info-file manual))
     (url                ALIAS       . uref)
     (uref               INLINE-ARGS . (url #:opt title replacement))
     (anchor             INLINE-ARGS . (name))

diff --git a/test-suite/tests/texinfo.test b/test-suite/tests/texinfo.test
index 9776f89..ebe4671 100644 (file)
--- a/test-suite/tests/texinfo.test
+++ b/test-suite/tests/texinfo.test
@@ -416,4 +416,7 @@
                           (name "foo")
                           (arguments "bar " (code "baz"))))
                (para "text that should be in a para")))
+  (test-body "@pxref{Locales, @code{setlocale}}"
+             '((para (pxref (% (node "Locales")
+                               (name (code "setlocale")))))))
   )