26 |
;;; Code: |
;;; Code: |
27 |
|
|
28 |
(require 'tex) |
(require 'tex) |
29 |
(condition-case nil ;Lucid is not providing. |
|
30 |
(require 'texinfo) |
(require 'texinfo) |
|
(error)) |
|
31 |
|
|
32 |
;;; Environments: |
;;; Environments: |
33 |
|
|
308 |
|
|
309 |
;;; Mode: |
;;; Mode: |
310 |
|
|
311 |
;;; Do not ;;;###autoload because of conflict with standard texinfo.el. |
;;;###autoload |
312 |
(TeX-defun texinfo-mode () |
(defalias 'Texinfo-mode texinfo-mode) |
313 |
|
;;;###autoload |
314 |
|
(TeX-doc) |
315 |
|
;;;###autoload |
316 |
|
(defun TeX-texinfo-mode () |
317 |
"Major mode in %s for editing Texinfo files. |
"Major mode in %s for editing Texinfo files. |
318 |
|
|
319 |
Special commands: |
Special commands: |