;; define sgml mode
(autoload 'sgml-mode "psgml" "Major mode to edit SGML files." t)
(setq auto-mode-alist
    (append (list
        (cons "\\.sgml$" 'sgml-mode)
        (cons "\\.sgm$"  'sgml-mode)
    ) auto-mode-alist)
)

;; define xml mode
(autoload 'xml-mode "psgml" "Major mode to edit XML files." t)
(setq auto-mode-alist
    (append (list
        (cons "\\.xml$" 'xml-mode)
    ) auto-mode-alist)
)

;; variables for xml-mode
(add-hook 'xml-mode-hook
    (function (lambda()
        (setq
            sgml-catalog-files
                '("C:\\cygwin\\usr\\share\\xml\\docbook\\4.2\\docbook.cat")
            sgml-always-quote-attributes   t
            sgml-minimize-attributes       nil
            sgml-omittag                   t
            sgml-shorttag                  t
            sgml-declaration        "/usr/share/sgml/xml.dcl"
            sgml-xml-declaration    "/usr/share/sgml/xml.dcl"
            sgml-validate-command          "onsgmls -wxml -s %s %s"
            sgml-xml-validate-command      "onsgmls -wxml -s %s %s"
        )
    ))
)

;; variables for sgml-mode
(add-hook 'sgml-mode-hook
    (function (lambda()
        (setq
            sgml-catalog-files
                '("C:\\cygwin\\usr\\share\\sgml\\docbook-sgml41\\docbook.cat")
            sgml-validate-command       "onsgmls -s %s %s"
        )
    ))
)

;; psgml common variables
(setq
    sgml-auto-activate-dtd         nil
    sgml-auto-insert-required-elements t
    sgml-balanced-tag-edit         t
    sgml-indent-data               nil
    sgml-indent-step               nil
    sgml-insert-missing-element-comment nil
    sgml-live-element-indicator    nil
    sgml-custom-dtd    '(
        ("DocBook XML V4.2 (article)" "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
<!DOCTYPE article PUBLIC \"-//OASIS//DTD DocBook XML V4.2//EN\"
\"/usr/share/xml/docbook/4.2/docbookx.dtd\">\n\r")
	("DocBook XML V4.2 (book)" "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
<!DOCTYPE book PUBLIC \"-//OASIS//DTD DocBook XML V4.2//EN\"
\"/usr/share/xml/docbook/4.2/docbookx.dtd\">\n\r")
        ("DocBook SGML V4.1 (article)" "<?xml version=\"1.0\" encoding=\"EUC-JP\"?>
<!DOCTYPE article PUBLIC \"-//OASIS//DTD DocBook V4.1//EN\">\n\r")
        ("DocBook SGML V4.1 (book)" "<?xml version=\"1.0\" encoding=\"EUC-JP\"?>
<!DOCTYPE book PUBLIC \"-//OASIS//DTD DocBook V4.1//EN\">\n\r")
    )
)