(sgml-tag): Fix bug: Call sgml-transformation-function.

2 files changed, 7 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bca021e7add..cf842507737 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-05-17  Christian Plate  <cplate@web.de>  (tiny change)
+
+        * textmodes/sgml-mode.el (sgml-tag):
+        Fix bug: Call sgml-transformation-function.
+
 2007-05-17  Martin Rudalics  <rudalics@gmx.at>
 
         * hilit-chg.el (highlight-changes-rotate-faces): Don't set
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index 51ff5e48a34..e8beed036c2 100644
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -619,10 +619,10 @@ This only works for Latin-1 input."
   "Prompt for a tag and insert it, optionally with attributes.
 Completion and configuration are done according to `sgml-tag-alist'.
 If you like tags and attributes in uppercase do \\[set-variable]
-`skeleton-transformation-function' RET `upcase' RET, or put this
+`sgml-transformation-function' RET `upcase' RET, or put this
 in your `.emacs':
   (setq sgml-transformation-function 'upcase)"
-  (funcall (or skeleton-transformation-function 'identity)
+  (funcall (or sgml-transformation-function 'identity)
            (setq sgml-tag-last
                  (completing-read
                   (if (> (length sgml-tag-last) 0)