Mercurial > emacs
comparison lisp/nxml/rng-loc.el @ 87328:9c863134ecd3
(rng-schema-locating-file-schema-file): Fix last change.
(rng-schema-locating-files-default): Look in current dir, as per manual.
| author | Jason Rumney <jasonr@gnu.org> |
|---|---|
| date | Wed, 19 Dec 2007 01:46:23 +0000 |
| parents | c2d365f73e14 |
| children | b9e8ab94c460 |
comparison
equal
deleted
inserted
replaced
| 87327:900d6ef255ce | 87328:9c863134ecd3 |
|---|---|
| 37 "Filename of schema being used for current buffer. | 37 "Filename of schema being used for current buffer. |
| 38 Nil if using a vacuous schema.") | 38 Nil if using a vacuous schema.") |
| 39 (make-variable-buffer-local 'rng-current-schema-file-name) | 39 (make-variable-buffer-local 'rng-current-schema-file-name) |
| 40 | 40 |
| 41 (defvar rng-schema-locating-files-default | 41 (defvar rng-schema-locating-files-default |
| 42 (list (expand-file-name "schema/schemas.xml" data-directory)) | 42 (list "schemas.xml" (expand-file-name "schema/schemas.xml" data-directory)) |
| 43 "Default value for variable `rng-schema-locating-files'.") | 43 "Default value for variable `rng-schema-locating-files'.") |
| 44 | 44 |
| 45 (defvar rng-schema-locating-file-schema-file | 45 (defvar rng-schema-locating-file-schema-file |
| 46 (list (expand-file-name "schema/locate.rnc" data-directory)) | 46 (expand-file-name "schema/locate.rnc" data-directory) |
| 47 "File containing schema for schema locating files.") | 47 "File containing schema for schema locating files.") |
| 48 | 48 |
| 49 (defvar rng-schema-locating-file-schema nil | 49 (defvar rng-schema-locating-file-schema nil |
| 50 "Schema for schema locating files or nil if not yet loaded.") | 50 "Schema for schema locating files or nil if not yet loaded.") |
| 51 | 51 |