From: yamaoka Date: Fri, 21 Sep 2007 05:04:03 +0000 (+0000) Subject: Support @fonttextsize, @textdegree by TAKAHASHI Kaoru . X-Git-Tag: ngnus-0_8-doc-ja~53 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5ae9adb5e554d5ef3cbb1ba4bbacd4a0270fee7a;p=elisp%2Fgnus-doc-ja.git Support @fonttextsize, @textdegree by TAKAHASHI Kaoru . --- diff --git a/ptexinfmt.el b/ptexinfmt.el index a7eb873..6049a0e 100644 --- a/ptexinfmt.el +++ b/ptexinfmt.el @@ -52,6 +52,10 @@ ;; @deftypeivar ;; @deftypeop ;; @allowcodebreaks +;; @thischapternum +;; @quotedblleft @quotedblright +;; @quoteleft @quoteright @quotedblbase @quotesinglbase +;; @guillemetleft @guillemetright @guilsinglleft @guilsinglright. ;;; Code: @@ -189,6 +193,7 @@ DOCSTRING will be printed if ASSERTION is nil and (put 'afourwide 'texinfo-format 'texinfo-discard-line) (put 'afivepaper 'texinfo-format 'texinfo-discard-line) (put 'pagesizes 'texinfo-format 'texinfo-discard-line-with-args) +(put 'fonttextsize 'texinfo-format 'texinfo-discard-line-with-args) ;; style (put 'setchapternewpage 'texinfo-format 'texinfo-discard-line-with-args) @@ -594,6 +599,12 @@ For example, @verb\{|@|\} results in @ and (ptexinfmt-defun-if-void texinfo-format-\/ () (texinfo-discard-command)) +;; @textdegree +(put 'textdegree 'texinfo-format 'texinfo-format-textdegree) +(ptexinfmt-defun-if-void texinfo-format-textdegree () + (insert "o" (texinfo-parse-arg-discard)) + (goto-char texinfo-command-start)) + ;;; Cross References ;; @ref, @xref