X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/49f70d46ea38ceb7a501594db7f6ea35e19681aa..61addbc212a08ba146fc7baa7b3c04071f4445fb:/lisp/nxml/nxml-outln.el diff --git a/lisp/nxml/nxml-outln.el b/lisp/nxml/nxml-outln.el index 41d2c165b9..e30aee3de5 100644 --- a/lisp/nxml/nxml-outln.el +++ b/lisp/nxml/nxml-outln.el @@ -1,6 +1,6 @@ ;;; nxml-outln.el --- outline support for nXML mode -;; Copyright (C) 2004, 2007, 2008, 2009, 2010, 2011, 2012 Free Software Foundation, Inc. +;; Copyright (C) 2004, 2007-2013 Free Software Foundation, Inc. ;; Author: James Clark ;; Keywords: XML @@ -60,7 +60,7 @@ ;; form. Single-line form is used when the outline state is hide-children ;; or there are no child sections; multi-line form is used otherwise. ;; There are two flavors of single-line form: with children and without. -;; The with-childen flavor is used when there are child sections. +;; The with-children flavor is used when there are child sections. ;; Single line with children looks like ;; <+section>A section title... ;; Single line without children looks like @@ -82,7 +82,7 @@ (defcustom nxml-section-element-name-regexp "article\\|\\(sub\\)*section\\|chapter\\|div\\|appendix\\|part\\|preface\\|reference\\|simplesect\\|bibliography\\|bibliodiv\\|glossary\\|glossdiv" - "*Regular expression matching the name of elements used as sections. + "Regular expression matching the name of elements used as sections. An XML element is treated as a section if: - its local name (that is, the name without the prefix) matches @@ -97,7 +97,7 @@ element has a local name matching the variable :type 'regexp) (defcustom nxml-heading-element-name-regexp "title\\|head" - "*Regular expression matching the name of elements used as headings. + "Regular expression matching the name of elements used as headings. An XML element is only recognized as a heading if it occurs as or within the first child of an element that is recognized as a section. See the variable `nxml-section-element-name-regexp' for more details." @@ -105,27 +105,24 @@ See the variable `nxml-section-element-name-regexp' for more details." :type 'regexp) (defcustom nxml-outline-child-indent 2 - "*Indentation in an outline for child element relative to parent element." + "Indentation in an outline for child element relative to parent element." :group 'nxml :type 'integer) -(defface nxml-heading - '((t (:weight bold))) - "Face used for the contents of abbreviated heading elements." +(defface nxml-heading '((t :weight bold)) + "Face for the contents of abbreviated heading elements." :group 'nxml-faces) -(defface nxml-outline-indicator - '((t (:inherit default))) - "Face used for `+' or `-' before element names in outlines." +(defface nxml-outline-indicator '((t)) + "Face for `+' or `-' before element names in outlines." :group 'nxml-faces) (defface nxml-outline-active-indicator - '((t (:box t :inherit nxml-outline-indicator))) - "Face used for clickable `+' or `-' before element names in outlines." + '((t :box t :inherit nxml-outline-indicator)) + "Face for clickable `+' or `-' before element names in outlines." :group 'nxml-faces) -(defface nxml-outline-ellipsis - '((t (:bold t :inherit default))) +(defface nxml-outline-ellipsis '((t :weight bold)) "Face used for `...' in outlines." :group 'nxml-faces) @@ -1037,5 +1034,4 @@ immediately after the section's start-tag." (provide 'nxml-outln) -;; arch-tag: 1f1b7454-e573-4cd7-a505-d9dc64eef828 ;;; nxml-outln.el ends here