[Emacs-diffs] Changes to emacs/lisp/nxml/nxml-outln.el,v

[Juanma Barranquero]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      08/07/03 12:25:23

Index: nxml/nxml-outln.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/nxml/nxml-outln.el,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- nxml/nxml-outln.el  6 May 2008 04:25:55 -0000       1.6
+++ nxml/nxml-outln.el  3 Jul 2008 12:25:21 -0000       1.7
@@ -438,7 +438,7 @@
 indent of the start-tag of the current element, or nil if no
 containing element has a non-nil OUTLINE-STATE.  TAG-QNAMES is a list
 of the qnames of the open elements.  Point is after the title content.
-Leave point after the closing end-tag Return t if we had a
+Leave point after the closing end-tag.  Return t if we had a
 non-transparent child section."
   (let ((last-pos (point))
        (transparent-depth 0)
@@ -765,12 +765,12 @@
                                 &optional
                                 front-advance
                                 rear-advance)
-  "Replace any nxml-outline-display overlays between START and END.
+  "Replace any `nxml-outline-display' overlays between START and END.
 Overlays are removed if they overlay the region between START and END,
-and have a non-nil nxml-outline-display property (typically via their
-category). If CATEGORY is non-nil, they will be replaced with a new overlay
-with that category from START to END. If CATEGORY is nil, no new
-overlay will be created."
+and have a non-nil `nxml-outline-display' property (typically via their
+category).  If CATEGORY is non-nil, they will be replaced with a new
+overlay with that category from START to END.  If CATEGORY is nil,
+no new overlay will be created."
   (when (< start end)
     (let ((overlays (overlays-in start end))
          overlay)
@@ -837,7 +837,7 @@
 
 (defun nxml-section-tag-forward ()
   "Move forward past the first tag that is a section start- or end-tag.
-Return xmltok-type for tag.
+Return `xmltok-type' for tag.
 If no tag found, return nil and move to the end of the buffer."
   (let ((case-fold-search nil)
        (tag-regexp (nxml-make-section-tag-regexp))
@@ -869,7 +869,7 @@
         
 (defun nxml-section-tag-backward ()
   "Move backward to the end of a tag that is a section start- or end-tag.
-The position of the end of the tag must be <= point
+The position of the end of the tag must be <= point.
 Point is at the end of the tag.  `xmltok-start' is the start."
   (let ((case-fold-search nil)
        (start (point))
@@ -922,7 +922,7 @@
   "Try to move back to the start of the section containing point.
 The start of the section must be <= point.
 Only visible sections are included unless INVISIBLE-OK is non-nil.
-If found, return t.  Otherwise move to point-min and return nil.
+If found, return t.  Otherwise move to `point-min' and return nil.
 If unbalanced section tags are found, signal an `nxml-outline-error'."
   (when (or (nxml-after-section-start-tag)
            (nxml-section-tag-backward))