Mercurial > hgrepos > hgweb.cgi > yatex

comparison yatex19.el @ 77:1b172d26b55e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix auto-fill movement on Emacs21. Fix YaTeX:ref. Support jump/change on AMS-LaTeX's parentheses.
author yuuji
date Thu, 01 May 2003 13:38:27 +0000
parents f41b01fef5d6
children 0734be649cb8
comparison
equal deleted inserted replaced
76:c16a10460ce5 77:1b172d26b55e
1 ;;; -*- Emacs-Lisp -*- 1 ;;; -*- Emacs-Lisp -*-
2 ;;; YaTeX facilities for Emacs 19 2 ;;; YaTeX facilities for Emacs 19
3 ;;; (c )1994-2002 by HIROSE Yuuji.[yuuji@yatex.org] 3 ;;; (c )1994-2003 by HIROSE Yuuji.[yuuji@yatex.org]
4 ;;; Last modified Wed May 22 13:55:20 2002 on firestorm 4 ;;; Last modified Fri Feb 21 01:35:19 2003 on firestorm
5 ;;; $Id$ 5 ;;; $Id$
6 6
7 ;(require 'yatex) 7 ;(require 'yatex)
8 8
9 (and (boundp 'YaTeX-use-hilit19) 9 (and (boundp 'YaTeX-use-hilit19)
16 (cond 16 (cond
17 ((boundp 'hilit-background-mode) hilit-background-mode) 17 ((boundp 'hilit-background-mode) hilit-background-mode)
18 ((boundp 'frame-background-mode) frame-background-mode) 18 ((boundp 'frame-background-mode) frame-background-mode)
19 ((fboundp 'get-frame-background-mode) 19 ((fboundp 'get-frame-background-mode)
20 (get-frame-background-mode (selected-frame))) 20 (get-frame-background-mode (selected-frame)))
21 (if (face-background 'default) 21 ((face-background 'default)
22 (if (> (+ 32768 32768 32768) 22 (if (> (+ 32768 32768 32768)
23 (apply '+ 23 (apply '+
24 (funcall (if (fboundp 'color-rgb-components) 24 (funcall (if (fboundp 'color-rgb-components)
25 'color-rgb-components 25 'color-rgb-components
26 'x-color-values) 26 'x-color-values)
27 (face-background 'default)))) 27 (face-background 'default))))
28 'dark 28 'dark
29 'light)) 29 'light))
30 (t nil))) 30 (t nil)))
31 31
32 (defvar YaTeX-mode-menu-map (make-sparse-keymap "YaTeX")) 32 (defvar YaTeX-mode-menu-map (make-sparse-keymap "YaTeX"))
33 (defvar YaTeX-mode-menu-map-process (make-sparse-keymap "Process")) 33 (defvar YaTeX-mode-menu-map-process (make-sparse-keymap "Process"))
34 (define-key YaTeX-mode-map [menu-bar yatex] 34 (define-key YaTeX-mode-map [menu-bar yatex]

yatex.org