From 293a14d13f58d0e67df712f3c5a23396f26e9db1 Mon Sep 17 00:00:00 2001 From: Jambunathan K Date: Sat, 10 Nov 2012 21:27:52 +0530 Subject: [PATCH] Update OpenDocument schema files to v1.2 OASIS standard * etc/schema/od-schema-v1.2-os.rnc: OASIS standard * etc/schema/od-manifest-schema-v1.2-os.rnc: OASIS standard * etc/schema/schemas.xml: Fix uri to rnc files. * lisp/org-odt.el (org-export-odt-schema-dir): Modified to accommodate change in rnc file names. * contrib/lisp/org-e-odt.el (org-e-odt-schema-dir): Modified to accommodate change in rnc file names. --- contrib/lisp/org-e-odt.el | 16 ++++++++-------- ...hema-v1.2-cs01.rnc => od-manifest-schema-v1.2-os.rnc} | 4 ++-- .../{od-schema-v1.2-cs01.rnc => od-schema-v1.2-os.rnc} | 4 ++-- etc/schema/schemas.xml | 4 ++-- lisp/org-odt.el | 16 ++++++++-------- 5 files changed, 22 insertions(+), 22 deletions(-) rename etc/schema/{od-manifest-schema-v1.2-cs01.rnc => od-manifest-schema-v1.2-os.rnc} (97%) rename etc/schema/{od-schema-v1.2-cs01.rnc => od-schema-v1.2-os.rnc} (99%) diff --git a/contrib/lisp/org-e-odt.el b/contrib/lisp/org-e-odt.el index 5904fadfd..c8257d0b2 100644 --- a/contrib/lisp/org-e-odt.el +++ b/contrib/lisp/org-e-odt.el @@ -381,11 +381,11 @@ visually." (lambda (schema-dir) (when schema-dir (message "Debug (org-e-odt): Trying %s..." schema-dir) - (when (and (file-readable-p - (expand-file-name "od-manifest-schema-v1.2-cs01.rnc" + (when (and (file-expand-wildcards + (expand-file-name "od-manifest-schema*.rnc" schema-dir)) - (file-readable-p - (expand-file-name "od-schema-v1.2-cs01.rnc" + (file-expand-wildcards + (expand-file-name "od-schema*.rnc" schema-dir)) (file-readable-p (expand-file-name "schemas.xml" schema-dir))) @@ -425,10 +425,10 @@ Also add it to `rng-schema-locating-files'." (let ((schema-dir value)) (set var (if (and - (file-readable-p - (expand-file-name "od-manifest-schema-v1.2-cs01.rnc" schema-dir)) - (file-readable-p - (expand-file-name "od-schema-v1.2-cs01.rnc" schema-dir)) + (file-expand-wildcards + (expand-file-name "od-manifest-schema*.rnc" schema-dir)) + (file-expand-wildcards + (expand-file-name "od-schema*.rnc" schema-dir)) (file-readable-p (expand-file-name "schemas.xml" schema-dir))) schema-dir diff --git a/etc/schema/od-manifest-schema-v1.2-cs01.rnc b/etc/schema/od-manifest-schema-v1.2-os.rnc similarity index 97% rename from etc/schema/od-manifest-schema-v1.2-cs01.rnc rename to etc/schema/od-manifest-schema-v1.2-os.rnc index 647828da8..bff1c0bb6 100644 --- a/etc/schema/od-manifest-schema-v1.2-cs01.rnc +++ b/etc/schema/od-manifest-schema-v1.2-os.rnc @@ -1,7 +1,7 @@ # Open Document Format for Office Applications (OpenDocument) Version 1.2 -# Committee Specification (CS) 01, 17 March 2011 +# OASIS Standard, 29 September 2011 # Manifest Relax-NG Schema -# +# Source: http://docs.oasis-open.org/office/v1.2/os/ # Copyright (c) OASIS Open 2002-2011. All Rights Reserved. # # All capitalized terms in the following text have the meanings assigned to them diff --git a/etc/schema/od-schema-v1.2-cs01.rnc b/etc/schema/od-schema-v1.2-os.rnc similarity index 99% rename from etc/schema/od-schema-v1.2-cs01.rnc rename to etc/schema/od-schema-v1.2-os.rnc index 83ad01709..28ecf34cc 100644 --- a/etc/schema/od-schema-v1.2-cs01.rnc +++ b/etc/schema/od-schema-v1.2-os.rnc @@ -1,7 +1,7 @@ # Open Document Format for Office Applications (OpenDocument) Version 1.2 -# Committee Specification (CS) 01, 17 March 2011 +# OASIS Standard, 29 September 2011 # Relax-NG Schema -# +# Source: http://docs.oasis-open.org/office/v1.2/os/ # Copyright (c) OASIS Open 2002-2011. All Rights Reserved. # # All capitalized terms in the following text have the meanings assigned to them diff --git a/etc/schema/schemas.xml b/etc/schema/schemas.xml index a319191ab..f1e0ed785 100644 --- a/etc/schema/schemas.xml +++ b/etc/schema/schemas.xml @@ -2,6 +2,6 @@ - - + + diff --git a/lisp/org-odt.el b/lisp/org-odt.el index f9fd6a2b9..db2a8d62b 100644 --- a/lisp/org-odt.el +++ b/lisp/org-odt.el @@ -115,11 +115,11 @@ and `org-odt-data-dir'.") (lambda (schema-dir) (when schema-dir (message "Debug (org-odt): Trying %s..." schema-dir) - (when (and (file-readable-p - (expand-file-name "od-manifest-schema-v1.2-cs01.rnc" + (when (and (file-expand-wildcards + (expand-file-name "od-manifest-schema*.rnc" schema-dir)) - (file-readable-p - (expand-file-name "od-schema-v1.2-cs01.rnc" + (file-expand-wildcards + (expand-file-name "od-schema*.rnc" schema-dir)) (file-readable-p (expand-file-name "schemas.xml" schema-dir))) @@ -159,10 +159,10 @@ Also add it to `rng-schema-locating-files'." (let ((schema-dir value)) (set var (if (and - (file-readable-p - (expand-file-name "od-manifest-schema-v1.2-cs01.rnc" schema-dir)) - (file-readable-p - (expand-file-name "od-schema-v1.2-cs01.rnc" schema-dir)) + (file-expand-wildcards + (expand-file-name "od-manifest-schema*.rnc" schema-dir)) + (file-expand-wildcards + (expand-file-name "od-schema*.rnc" schema-dir)) (file-readable-p (expand-file-name "schemas.xml" schema-dir))) schema-dir -- 2.11.4.GIT