"ThinSpaceInFrenchNumbers"
"FrenchLayout"
"StandardLayout")
- (unless (eq (car TeX-quote-language) 'override)
- (setq TeX-quote-language
- `("french" "\\og "
- (lambda ()
- (concat "\\fg"
- (unless (member "xspace" TeX-active-styles) "{}")))
- ,TeX-quote-after-quote)))
+ (setq TeX-quote-language
+ `("french" "\\og "
+ (lambda ()
+ (concat "\\fg"
+ (unless (member "xspace" TeX-active-styles) "{}")))
+ ,TeX-quote-after-quote))
(run-hooks 'TeX-language-fr-hook)))
;;; frenchb.el ends here