[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/textmodes/sgml-mode.el
From: |
Romain Francoise |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/textmodes/sgml-mode.el |
Date: |
Fri, 26 Aug 2005 06:02:06 -0400 |
Index: emacs/lisp/textmodes/sgml-mode.el
diff -c emacs/lisp/textmodes/sgml-mode.el:1.112
emacs/lisp/textmodes/sgml-mode.el:1.113
*** emacs/lisp/textmodes/sgml-mode.el:1.112 Mon Aug 15 21:29:32 2005
--- emacs/lisp/textmodes/sgml-mode.el Fri Aug 26 10:02:03 2005
***************
*** 901,907 ****
(forward-list)))))))
! (autoload 'compile-internal "compile")
(defun sgml-validate (command)
"Validate an SGML document.
--- 901,907 ----
(forward-list)))))))
! (autoload 'compilation-start "compile")
(defun sgml-validate (command)
"Validate an SGML document.
***************
*** 919,925 ****
(file-name-nondirectory name))))))))
(setq sgml-saved-validate-command command)
(save-some-buffers (not compilation-ask-about-save) nil)
! (compile-internal command "No more errors"))
(defsubst sgml-at-indentation-p ()
"Return true if point is at the first non-whitespace character on the line."
--- 919,925 ----
(file-name-nondirectory name))))))))
(setq sgml-saved-validate-command command)
(save-some-buffers (not compilation-ask-about-save) nil)
! (compilation-start command))
(defsubst sgml-at-indentation-p ()
"Return true if point is at the first non-whitespace character on the line."