annotate etc/auctex/style/german.el @ 50:ee648375d8d6 r19-16b91

Import from CVS: tag r19-16b91
author cvs
date Mon, 13 Aug 2007 08:56:41 +0200
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
50
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
1 ;;; german.el - Setup AUC TeX for editing German text.
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
2
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
3 ;; $Id: german.el,v 1.1 1997/08/30 02:45:15 steve Exp $
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
4
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
5 ;;; Commentary:
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
6 ;;
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
7 ;; `german.sty' use `"' to give next character an umlaut.
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
8
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
9 ;;; Code:
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
10
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
11 (defvar LaTeX-german-mode-syntax-table
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
12 (copy-syntax-table LaTeX-mode-syntax-table)
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
13 "Syntax table used in LaTeX mode when using `german.sty'.")
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
14
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
15 (modify-syntax-entry ?\" "w" LaTeX-german-mode-syntax-table)
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
16
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
17 (TeX-add-style-hook "german"
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
18 (function (lambda ()
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
19 (set-syntax-table LaTeX-german-mode-syntax-table)
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
20 (make-local-variable 'TeX-open-quote)
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
21 (make-local-variable 'TeX-close-quote)
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
22 (make-local-variable 'TeX-quote-after-quote)
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
23 (setq TeX-quote-after-quote t)
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
24 (setq TeX-open-quote "\"`")
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
25 (setq TeX-close-quote "\"'")
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
26 (run-hooks 'TeX-language-de-hook))))
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
27
ee648375d8d6 Import from CVS: tag r19-16b91
cvs
parents:
diff changeset
28 ;;; german.el ends here