master b730c4acfcf: Fix skeleton-related errors in sgml-mode.el

[Eli Zaretskii]

branch: master
commit b730c4acfcff20047a5c574fbf36c5ef1271b902
Author: Eli Zaretskii <eliz@gnu.org>
Commit: Eli Zaretskii <eliz@gnu.org>

    Fix skeleton-related errors in sgml-mode.el
    
    * lisp/textmodes/sgml-mode.el (sgml-mode-facemenu-add-face-function)
    (sgml-attributes): Require 'skeleton before using its symbols.
    (Bug#53710)
---
 lisp/textmodes/sgml-mode.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index f126df8955a..ee585896946 100644
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -533,6 +533,7 @@ an optional alist of possible values."
   "Add \"face\" tags with `facemenu-keymap' commands."
   (let ((tag-face (ensure-list (cdr (assq face sgml-face-tag-alist)))))
     (cond (tag-face
+           (require 'skeleton)
           (setq tag-face (funcall skeleton-transformation-function tag-face))
            (setq facemenu-end-add-face
                  (mapconcat (lambda (f) (concat "</" f ">")) (reverse 
tag-face)))
@@ -851,6 +852,7 @@ If QUIET, do not print a message when there are no 
attributes for TAG."
             (setq alist (cons '("class") alist)))
           (unless (assoc-string "id" alist)
             (setq alist (cons '("id") alist))))
+        (require 'skeleton)
        (if (stringp (car alist))
            (progn
              (insert (if (eq (preceding-char) ?\s) "" ?\s)