;;; rng-auto.el --- automatically extracted autoloads for RELAX NG ;; Copyright (C) 2003 Free Software Foundation, Inc. ;; Author: James Clark ;; Keywords: XML, RelaxNG ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU General Public License as ;; published by the Free Software Foundation; either version 2 of ;; the License, or (at your option) any later version. ;; This program is distributed in the hope that it will be ;; useful, but WITHOUT ANY WARRANTY; without even the implied ;; warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR ;; PURPOSE. See the GNU General Public License for more details. ;; You should have received a copy of the GNU General Public ;; License along with this program; if not, write to the Free ;; Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, ;; MA 02111-1307 USA (setq nxml-version "20041004") (unless (and (fboundp 'make-hash-table) (boundp 'fontification-functions)) (error "FSF GNU Emacs version 21 or later required")) (when (featurep 'mucs) (error "nxml-mode is not compatible with Mule-UCS")) ;; Add fix for Unicode-display bug in Emacs 21.1 on Windows (fixed in 21.2) (when (and (fboundp 'w32-add-charset-info) (boundp 'w32-charset-info-alist) (not (assoc "iso10646-1" w32-charset-info-alist))) (w32-add-charset-info "iso10646-1" 'w32-charset-ansi t)) (defun rng-add-info-dir (dir) (cond ((and (boundp 'Info-directory-list) Info-directory-list) (unless (member dir Info-directory-list) (setq Info-directory-list (append Info-directory-list (list dir))) (when (boundp 'Info-dir-contents) (setq Info-dir-contents nil)) (when (and (boundp 'Info-current-file) (equal Info-current-file "dir") (fboundp 'Info-find-node-2) (get-buffer "*info*")) (save-excursion (set-buffer (get-buffer "*info*")) (Info-find-node-2 t "Top"))))) (t (unless (member dir Info-default-directory-list) (setq Info-default-directory-list (append Info-default-directory-list (list dir))))))) (let* ((dir (file-name-directory load-file-name)) (schema-dir (concat dir "schema/"))) (unless (member dir load-path) (setq load-path (cons dir load-path))) (setq rng-schema-locating-files-default (list "schemas.xml" (abbreviate-file-name (expand-file-name "schemas.xml" schema-dir)))) (setq rng-schema-locating-file-schema-file (expand-file-name "locate.rnc" schema-dir)) (rng-add-info-dir dir)) ;; Users shouldn't edit this. ;; Instead they should customize `rng-preferred-prefix-alist'. (setq rng-preferred-prefix-alist-default ;; For XHTML and RELAX NG, prefer no prefix '(("http://www.w3.org/1999/XSL/Transform" . "xsl") ("http://www.w3.org/1999/02/22-rdf-syntax-ns#" . "rdf"))) (add-hook 'nxml-mode-hook 'rng-nxml-mode-init) (add-hook 'nxml-mode-hook 'nxml-enable-unicode-char-name-sets) (setq rng-schema-loader-alist '(("rnc" . rng-c-load-schema))) ;; This is needed for compatibility with versions before 21.4. ;; We need mode-line-process to be risky because otherwise we can't ;; :eval in its value. (put 'mode-line-process 'risky-local-variable t) (require 'nxml-enc) ;; Install our own `set-auto-coding-function'. (nxml-start-auto-coding) ;;;### (autoloads (nxml-glyph-display-string) "nxml-glyph" "nxml-glyph.el" ;;;;;; (16278 18099)) ;;; Generated autoloads from nxml-glyph.el (autoload (quote nxml-glyph-display-string) "nxml-glyph" "\ Return a string that can display a glyph for Unicode code-point N. FACE gives the face that will be used for displaying the string. Return nil if the face cannot display a glyph for N." nil nil) ;;;*** ;;;### (autoloads (nxml-mode) "nxml-mode" "nxml-mode.el" (16702 54517)) ;;; Generated autoloads from nxml-mode.el (autoload (quote nxml-mode) "nxml-mode" "\ Major mode for editing XML. Syntax highlighting is performed unless the variable `nxml-syntax-highlight-flag' is nil. \\[nxml-finish-element] finishes the current element by inserting an end-tag. C-c C-i closes a start-tag with `>' and then inserts a balancing end-tag leaving point between the start-tag and end-tag. \\[nxml-balanced-close-start-tag-block] is similar but for block rather than inline elements: the start-tag, point, and end-tag are all left on separate lines. If `nxml-slash-auto-complete-flag' is non-nil, then inserting a `