emacs-diffs
[Top][All Lists]
Advanced

[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."




reply via email to

[Prev in Thread] Current Thread [Next in Thread]