+++ /dev/null
-;; 06-tex-site-sy.el --- Because AUCTeX is stupid -*- Emacs-Lisp -*-
-
-;; Copyright (C) 2007 - 2020 Steve Youngs
-
-;; Author: Steve Youngs <steve@sxemacs.org>
-;; Maintainer: Steve Youngs <steve@sxemacs.org>
-;; Created: <2007-12-02>
-;; Time-stamp: <Thursday Mar 19, 2020 10:58:18 steve>
-;; Download: <http://bastard.steveyoungs.com/~steve/SXEmacs/inits/>
-;; HTMLised: <http://bastard.steveyoungs.com/~steve/SXEmacs/htmlinits/06-tex-site-sy.html>
-;; Git Repo: git clone https://git.sxemacs.org/syinit
-;; Keywords: init, compile
-
-;; This file is part of SYinit
-
-;; Redistribution and use in source and binary forms, with or without
-;; modification, are permitted provided that the following conditions
-;; are met:
-;;
-;; 1. Redistributions of source code must retain the above copyright
-;; notice, this list of conditions and the following disclaimer.
-;;
-;; 2. Redistributions in binary form must reproduce the above copyright
-;; notice, this list of conditions and the following disclaimer in the
-;; documentation and/or other materials provided with the distribution.
-;;
-;; 3. Neither the name of the author nor the names of any contributors
-;; may be used to endorse or promote products derived from this
-;; software without specific prior written permission.
-;;
-;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR "AS IS" AND ANY EXPRESS OR
-;; IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
-;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-;; DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
-;; FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-;; CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-;; SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
-;; BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
-;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
-;; OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
-;; IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
-;;; Commentary:
-;;
-;; This is just because the tex-site.el you get in the XEmacs AUCTeX
-;; package is nuts.
-
-;;; Credits:
-;;
-;; The HTML version of this file was created with Hrvoje Niksic's
-;; htmlize.el which is part of the XEmacs "text-modes" package.
-;;
-
-;;; Todo:
-;;
-;;
-
-;;; Code:
-(if (< emacs-major-version 21)
- (error "AUCTeX requires Emacs 21 or later"))
-
-(defvar no-doc
- "This function is part of AUCTeX, but has not yet been loaded.
-Full documentation will be available after autoloading the function."
- "Documentation for autoload functions.")
-
-(setq TeX-image-directory
- (file-name-as-directory
- (expand-file-name "images" (locate-data-directory "auctex"))))
-
-;; System-wide writable directories are a bad idea at the best of
-;; times. Pretty much the only way of doing it even remotely safely
-;; is to use 1777 perms on the directory. Until I update AUCTeX to do
-;; just that this var will default to nil unless it is writable to me.
-(setq TeX-auto-global
- (let ((dir (file-name-as-directory
- (expand-file-name "auto"
- (locate-data-directory "auctex")))))
- (or (and (file-writable-p dir) dir)
- ;; If it doesn't exist but parent is writable, allow it.
- (and (file-writable-p (file-dirname dir)) dir))))
-
-;:*=======================
-;:* LaTeX or latex ???
-;; Remove the built-in ones that use latex-mode
-(remove-alist 'auto-mode-alist "\\.\\(?:sty\\|cls\\|bbl\\)\\'")
-(remove-alist 'auto-mode-alist "\\.[tT]e[xX]\\'")
-(remove-alist 'auto-mode-alist "\\.ltx\\'")
-;; Add them back for LaTeX-mode
-(add-to-list 'auto-mode-alist '("\\.\\(?:sty\\|cls\\|bbl\\)\\'" . LaTeX-mode))
-(add-to-list 'auto-mode-alist '("\\.[tT]e[xX]\\'" . LaTeX-mode))
-(add-to-list 'auto-mode-alist '("\\.ltx\\'" . LaTeX-mode))
-(add-to-list 'auto-mode-alist '("\\.drv\\'" . LaTeX-mode))
-;; doctex
-(add-to-list 'auto-mode-alist '("\\.dtx\\'" . doctex-mode))
-
-;; This hook will store bibitems when you save a BibTeX buffer.
-(add-hook 'bibtex-mode-hook 'BibTeX-auto-store)
-(autoload 'BibTeX-auto-store "latex" no-doc t)
-
-(autoload 'tex-mode "tex" no-doc t)
-(autoload 'plain-tex-mode "tex" no-doc t)
-(autoload 'ams-tex-mode "tex" no-doc t)
-(autoload 'context-mode "context" no-doc t)
-(autoload 'doctex-mode "latex" no-doc t)
-(autoload 'TeX-auto-generate "tex" no-doc t)
-(autoload 'TeX-auto-generate-global "tex" no-doc t)
-(autoload 'TeX-insert-quote "tex" no-doc t)
-(autoload 'TeX-submit-bug-report "tex" no-doc t)
-(autoload 'japanese-plain-tex-mode "tex-jp" no-doc t)
-(autoload 'japanese-latex-mode "tex-jp" no-doc t)
-(autoload 'latex-mode "latex" no-doc t)
-(autoload 'LaTeX-mode "latex" no-doc t)
-(autoload 'TeX-latex-mode "latex" no-doc t)
-
-;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-(message "Sane tex-site loaded successfully")
-
projects / syinit / blobdiff