Re: How to define a new font inserting command in AucTeX?

[Adam P.]

Gerald Wildgruber <gwil.remove.this.phrase@lrz.uni-muenchen.de> writes:

> Can anyone help me with the definition of a new font command in AucTeX; I
> would like to make 
>
> C-c C-f C-g
>
> insert the string
>
> \textgreek{}
>
> in analogy to the other font commands (like `C-c C-f C-e' for `\emph{}'),
> with text between point an mark being placed inbetween the brackets.
>
> How can I achieve this?

Does this work?

(setq LaTeX-font-list 
  '((?\C-a ""              ""  "\\mathcal{"    "}")
    (?\C-b "\\textbf{"     "}" "\\mathbf{"     "}")
    (?\C-c "\\textsc{"     "}")
    (?\C-e "\\emph{"       "}")
    (?\C-f "\\textsf{"     "}" "\\mathsf{"     "}")
    (?\C-i "\\textit{"     "}" "\\mathit{"     "}")
    (?\C-m "\\textmd{"     "}")
    (?\C-n "\\textnormal{" "}" "\\mathnormal{" "}")
    (?\C-r "\\textrm{"     "}" "\\mathrm{"     "}")
    (?\C-s "\\textsl{"     "}")
    (?\C-t "\\texttt{"     "}" "\\mathtt{"     "}")
    (?\C-u "\\textup{"     "}")
    (?\C-d "" "" t)
;; Note the line below
    (?\C-g "\\textgreek{" "}" "\\textgreek{" "}") 
    )
  )

  Adam
-- 
Name and address in X-Real...