From: Leo Liu <sdl.web@gmail.com>
Date: Sun, 25 Nov 2012 16:07:58 +0000 (+0800)
Subject: * lisp/textmodes/sgml-mode.el (sgml-tag): Fix indentation for closing tag.
X-Git-Tag: emacs-24.3.90~173^2~13^2~1
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9ad7950682da214673bfea09d9242eb5b538073a;p=emacs.git

* lisp/textmodes/sgml-mode.el (sgml-tag): Fix indentation for closing tag.

Fixes: debbugs:12979
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f0a487370d3..9e403af6416 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-11-25  Leo Liu  <sdl.web@gmail.com>
+
+	* textmodes/sgml-mode.el (sgml-tag): Fix indentation for closing tag.
+	(Bug#12979)
+
 2012-11-24  Vincent Belaïche  <vincentb1@users.sourceforge.net>
 
 	* textmodes/reftex-parse.el (reftex-parse-from-file): Use variable
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index 46c65b25b37..ed031664246 100644
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -671,13 +671,13 @@ in your `.emacs':
       (if (eq v2 t) (setq v2 nil))
       ;; We use `identity' to prevent skeleton from passing
       ;; `str' through `skeleton-transformation-function' a second time.
-      '(("") v2 _ v2 "</" (identity ',str) ?>))
+      '(("") v2 _ v2 "</" (identity ',str) ?> >))
      ((eq (car v2) t)
       (cons '("") (cdr v2)))
      (t
       (append '(("") (car v2))
 	      (cdr v2)
-	      '(resume: (car v2) _ "</" (identity ',str) ?>))))))
+	      '(resume: (car v2) _ "</" (identity ',str) ?> >))))))
 
 (autoload 'skeleton-read "skeleton")