# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1034929849 0
# Node ID b5ddbda34d8e43a45461d3a0109828cd8facee5d
# Parent  9545a9f6a23ec7922e61c1c297317611542aeb39
(sgml-close-tag, html-imenu-index): Fix typo.

diff -r 9545a9f6a23e -r b5ddbda34d8e lisp/textmodes/sgml-mode.el
--- a/lisp/textmodes/sgml-mode.el	Fri Oct 18 08:27:27 2002 +0000
+++ b/lisp/textmodes/sgml-mode.el	Fri Oct 18 08:30:49 2002 +0000
@@ -1074,14 +1074,14 @@
 		      (/= (point) (sgml-tag-start (car context)))
                       (sgml-unclosed-tag-p (sgml-tag-name (car context)))))
 	     (setq tag-info (ignore-errors (sgml-parse-tag-backward))))
-      
+
       ;; This tag may enclose things we thought were tags.  If so,
       ;; discard them.
       (while (and context
                   (> (sgml-tag-end tag-info)
                      (sgml-tag-end (car context))))
         (setq context (cdr context)))
-      
+
       (cond
 
        ;; start-tag
@@ -1144,7 +1144,7 @@
 ;; Editing shortcuts
 
 (defun sgml-close-tag ()
-  "Insert an close-tag for the current element."
+  "Insert a close-tag for the current element."
   (interactive)
   (case (car (sgml-lexical-context))
     (comment 	(insert " -->"))
@@ -1259,7 +1259,7 @@
 	   (goto-char there)
 	   (+ (current-column)
 	      (* sgml-basic-offset (length context))))))
-      
+
       (otherwise
        (error "Unrecognised context %s" (car lcon)))
 
@@ -1740,7 +1740,7 @@
 The third `match-string' will be the used in the menu.")
 
 (defun html-imenu-index ()
-  "Return an table of contents for an HTML buffer for use with Imenu."
+  "Return a table of contents for an HTML buffer for use with Imenu."
   (let (toc-index)
     (save-excursion
       (goto-char (point-min))