From 4ae42f3fc326b81a2d3ef277cd0eefb14a694d6a Mon Sep 17 00:00:00 2001 From: kaoru Date: Mon, 12 Apr 2004 04:48:33 +0000 Subject: [PATCH] * ptexinfmt.el: Support @indicateurl, @LaTeX, @ordf, @ordm. --- utils/ChangeLog | 2 +- utils/ptexinfmt.el | 12 ++++++++++++ 2 files changed, 13 insertions(+), 1 deletion(-) diff --git a/utils/ChangeLog b/utils/ChangeLog index b6e7987..5b2ef50 100644 --- a/utils/ChangeLog +++ b/utils/ChangeLog @@ -1,6 +1,6 @@ 2004-04-12 TAKAHASHI Kaoru - * ptexinfmt.el: Support @indicateurl, @LaTeX. + * ptexinfmt.el: Support @indicateurl, @LaTeX, @ordf, @ordm. @url is now a synonym for @uref. 2004-02-11 TAKAHASHI Kaoru diff --git a/utils/ptexinfmt.el b/utils/ptexinfmt.el index 2ef5cc3..41690f1 100644 --- a/utils/ptexinfmt.el +++ b/utils/ptexinfmt.el @@ -399,6 +399,18 @@ For example, @verb\{|@|\} results in @ and (texinfo-parse-arg-discard) (insert "#")) +;; @ordf{} ==> a Spanish feminine +(put 'ordf 'texinfo-format 'texinfo-format-ordf) +(ptexinfmt-defun-if-void texinfo-format-ordf () + (texinfo-parse-arg-discard) + (insert "o")) + +;; @ordm{} ==> o Spanish masculine +(put 'ordm 'texinfo-format 'texinfo-format-ordm) +(ptexinfmt-defun-if-void texinfo-format-ordm () + (texinfo-parse-arg-discard) + (insert "o")) + ;; @OE{} ==> OE French-OE-ligature (put 'OE 'texinfo-format 'texinfo-format-French-OE-ligature) (ptexinfmt-defun-if-void texinfo-format-French-OE-ligature () -- 1.7.10.4